summaryrefslogtreecommitdiff
path: root/lib/Vyatta/Quagga/Config.pm
diff options
context:
space:
mode:
authorRobert Bays <rbays@roatan.(none)>2010-04-05 23:25:06 -0700
committerRobert Bays <rbays@roatan.(none)>2010-04-05 23:25:06 -0700
commita37b449ce7546851ab801d62d9260d773b24e005 (patch)
treeb36ad059baa868d9845cd6ca77b92dc4f3a03297 /lib/Vyatta/Quagga/Config.pm
parent491d6af23d38f91dc87d310457db7d40f3226e16 (diff)
downloadvyatta-cfg-quagga-a37b449ce7546851ab801d62d9260d773b24e005.tar.gz
vyatta-cfg-quagga-a37b449ce7546851ab801d62d9260d773b24e005.zip
initial update to bgp with new ipv6 and peer-group nodes
Diffstat (limited to 'lib/Vyatta/Quagga/Config.pm')
-rw-r--r--lib/Vyatta/Quagga/Config.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Vyatta/Quagga/Config.pm b/lib/Vyatta/Quagga/Config.pm
index 107731fe..a1e76f80 100644
--- a/lib/Vyatta/Quagga/Config.pm
+++ b/lib/Vyatta/Quagga/Config.pm
@@ -30,6 +30,7 @@ my %_vtysh;
my %_vtyshdel;
my $_qcomref = '';
my $_qcomdelref = '';
+my $_vtyshexe = '/usr/bin/vtysh';
### Public methods -
# Create the class.
@@ -187,7 +188,7 @@ sub cmpb { $b cmp $a }
sub _sendQuaggaCommand {
my ($command) = @_;
my $section;
- my $args = "/usr/sbin/vtysh --noerr -c 'configure terminal' ";
+ my $args = "$_vtyshexe --noerr -c 'configure terminal' ";
my @commands = split / ; /, $command;
foreach $section (@commands) {
@@ -195,6 +196,7 @@ sub _sendQuaggaCommand {
}
if ($_DEBUG >= 2) { print "DEBUG: _sendQuaggaCommand - args prior to system call - $args\n"; }
+ # TODO: need to fix this system call. split into command and args.
system("$args");
if ($? != 0) {
# TODO: note that DEBUG will never happen here with --noerr as an argument.