diff options
author | Peter Palfrader <peter@palfrader.org> | 2004-04-24 10:35:54 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2004-04-24 10:35:54 +0000 |
commit | 54452b9931d8bc255b5706dbeade6432dd28e317 (patch) | |
tree | 86e3349517304b325bb3d7c454b476b538a32336 | |
parent | b77e9231dedf5db58e9428314a7fe836becc00c9 (diff) |
Accept show=, ping=, and fetchit= in addition to their real names in set
-rw-r--r-- | NEWS | 2 | ||||
-rwxr-xr-x | pingd | 11 |
2 files changed, 11 insertions, 2 deletions
@@ -1,6 +1,8 @@ Changes in version - 2004 * Have new disable and enable commands which are shortcut for set pingit=off showit=off fetch=off and =on respectively. + * Accept show=, ping=, and fetchit= in addition to their real + names in set. Changes in version 2.1.3 - 2004-04-20 * Improvements to pingd.conf(5) by Colin. @@ -405,8 +405,15 @@ sub command_set(@) { my @argv = @_; my @settings; - while (scalar @argv && $argv[0] =~ /^(showit|pingit|fetch)=(on|off)$/) { - push @settings, $argv[0]; + while (scalar @argv && $argv[0] =~ /^(show(?:it)?|ping(?:it)?|fetch(?:it))=(on|off)$/) { + $name = $1; + $value = $2; + + $name = 'showit' if ($name eq 'show'); + $name = 'pingit' if ($name eq 'ping'); + $name = 'fetch' if ($name eq 'fetchit'); + + push @settings, "$name=$value"; shift @argv; }; |