diff options
| author | Stig Thormodsrud <stig@vyatta.com> | 2010-12-10 14:18:54 -0800 |
|---|---|---|
| committer | Stig Thormodsrud <stig@vyatta.com> | 2010-12-10 14:18:54 -0800 |
| commit | 095be92e4456d321a6883205b9328716efa30aab (patch) | |
| tree | cccb4f3a4c24ebea81097992748aed75bc0c2e0a | |
| parent | 5c77a0d14941386c2991686c7dd5450bad7a8aef (diff) | |
| download | vyatta-cfg-095be92e4456d321a6883205b9328716efa30aab.tar.gz vyatta-cfg-095be92e4456d321a6883205b9328716efa30aab.zip | |
Export inSession to the perl api.
| -rwxr-xr-x | lib/Vyatta/Config.pm | 7 | ||||
| -rw-r--r-- | perl_dmod/Cstore/Cstore.xs | 6 |
2 files changed, 13 insertions, 0 deletions
diff --git a/lib/Vyatta/Config.pm b/lib/Vyatta/Config.pm index 69ed34b..187efa0 100755 --- a/lib/Vyatta/Config.pm +++ b/lib/Vyatta/Config.pm @@ -186,6 +186,13 @@ sub sessionChanged { return $self->{_cstore}->sessionChanged(); } +## inSession() +# returns whether in a config session +sub inSession { + my ($self) = @_; + return $self->{_cstore}->inSession(); +} + ## loadFile() # "load" the specified file sub loadFile { diff --git a/perl_dmod/Cstore/Cstore.xs b/perl_dmod/Cstore/Cstore.xs index 255eac0..8633a76 100644 --- a/perl_dmod/Cstore/Cstore.xs +++ b/perl_dmod/Cstore/Cstore.xs @@ -333,3 +333,9 @@ OUTPUT: RETVAL +bool +Cstore::inSession() +CODE: + RETVAL = THIS->inSession(); +OUTPUT: + RETVAL |