From 84b6331ed5a7b16af0af21dbd6f9670e7b72876b Mon Sep 17 00:00:00 2001
From: Marat Nepomnyashy <marat@vyatta.com>
Date: Tue, 26 Feb 2008 13:53:43 -0800
Subject: Query original/active runtime config rather than the new/pending
 config.

---
 scripts/vyatta-show-vpn.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/scripts/vyatta-show-vpn.pl b/scripts/vyatta-show-vpn.pl
index bad76b5..b5fccee 100755
--- a/scripts/vyatta-show-vpn.pl
+++ b/scripts/vyatta-show-vpn.pl
@@ -73,12 +73,12 @@ if ($arg0 eq 'rsa-keys') {
     my $vc = new VyattaConfig();
     $vc->setLevel('vpn');
 
-    my @peers = $vc->listNodes('ipsec site-to-site peer');
+    my @peers = $vc->listOrigNodes('ipsec site-to-site peer');
     foreach my $peer (@peers) {
-        my $mode = $vc->returnValue("ipsec site-to-site peer $peer authentication mode");
+        my $mode = $vc->returnOrigValue("ipsec site-to-site peer $peer authentication mode");
         if ($mode eq 'rsa') {
-            my $rsa_key_name = $vc->returnValue("ipsec site-to-site peer $peer authentication rsa-key-name");
-            my $remote_key = $vc->returnValue("rsa-keys rsa-key-name $rsa_key_name rsa-key");
+            my $rsa_key_name = $vc->returnOrigValue("ipsec site-to-site peer $peer authentication rsa-key-name");
+            my $remote_key = $vc->returnOrigValue("rsa-keys rsa-key-name $rsa_key_name rsa-key");
             print "=" x 80, "\n";
             print "Peer IP: $peer";
             if (defined($rsa_key_name)) {
-- 
cgit v1.2.3