diff options
author | etienne | 2000-12-28 13:03:10 +0000 |
---|---|---|
committer | etienne | 2000-12-28 13:03:10 +0000 |
commit | d69516e149ab8917b8457d4bd3df02c572bdb93b (patch) | |
tree | 23d987ad4036ff52b01b189bd1e881e34b0496b6 /src | |
parent | 282792f57f00cf8492aeddbc14a6effa3c7de077 (diff) | |
download | ivymon-d69516e149ab8917b8457d4bd3df02c572bdb93b.zip ivymon-d69516e149ab8917b8457d4bd3df02c572bdb93b.tar.gz ivymon-d69516e149ab8917b8457d4bd3df02c572bdb93b.tar.bz2 ivymon-d69516e149ab8917b8457d4bd3df02c572bdb93b.tar.xz |
*** empty log message ***
Diffstat (limited to 'src')
-rwxr-xr-x | src/ivymon | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -39,7 +39,7 @@ $mw->minsize(850, 768); if (not GetOptions('-help', '-history=s', '-b=s') or $opt_help) { print "Usage: ivymon [options]\n"; print "Options : \n"; - print " -s <[addr]:port> bus port(default $ivy_port)\n"; + print " -b <[addr]:port> bus port(default $ivy_port)\n"; print " -history <number> messages history length (default $history)\n"; print " -help help message \n"; exit ; @@ -209,7 +209,6 @@ my $bindingsRemove = -command => [\&removeBinding])->pack(-fill => 'both', -side => 'bottom', -expand => 1); - #---------------------------------------------------------------------------------- # Description de la zone Recherche #---------------------------------------------------------------------------------- @@ -367,6 +366,10 @@ $ivy->start; $mw->repeat(1000, \&updateDuration); +# par defaut on cree l'abonnement (.*) +$bindingsEntry->insert(0, '(.*)'); +&addBinding; + MainLoop; #================================================================================== |