Changeset 298

Timestamp:

Oct 4, 2017, 7:25:43 PM (7 years ago)

Author:

g7moreau

Message:

• Add function update_switchdb

File:

• trunk/klask (modified) (2 diffs)

trunk/klask

@@ -2522 +2522 @@
 
 #---------------------------------------------------------------
-sub cmd_updatesw {
-   @ARGV = @_;
-
-   my $verbose;
-
-   GetOptions(
-      'verbose|v' => \$verbose,
-      );
+sub update_switchdb {
+   my %args = (
+      verbose => 0,
+      @_);
 
    init_switch_names('yes');    #nomme les switchs
@@ -2746 +2742 @@
    YAML::Syck::DumpFile("$KLASK_SW_FILE", $switch_connection);
    return;
+   }
+
+#---------------------------------------------------------------
+sub cmd_updatesw {
+   @ARGV = @_;
+
+   my $verbose;
+
+   GetOptions(
+      'verbose|v' => \$verbose,
+      );
+   
+   update_switchdb(verbose => $verbose);
    }