[aix-pm-cvs] modules/util csv.pl,1.45,1.46

[Gerhard G. <go...@us...>]

Update of /cvsroot/aix-pm/modules/util
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv28102

Modified Files:
	csv.pl 
Log Message:
add option 'select' as an alias for 'search' which was not such a good name

Index: csv.pl
===================================================================
RCS file: /cvsroot/aix-pm/modules/util/csv.pl,v
retrieving revision 1.45
retrieving revision 1.46
diff -C2 -d -r1.45 -r1.46
*** csv.pl	13 Sep 2016 11:52:19 -0000	1.45
--- csv.pl	22 Sep 2016 13:39:56 -0000	1.46
***************
*** 110,114 ****
      elsif ($opt eq 'out')    { $out_file=      $val || shift (@ARGV); }
      elsif ($opt eq 'find')   { $find_pattern=  $val || shift (@ARGV); } # TODO: allow multiple patterns!
!     elsif ($opt eq 'search') { $search_string= $val || shift (@ARGV); } # TODO: allow multiple searches!
      elsif ($opt eq 'max')    { $max_items=     $val || shift (@ARGV); }
      elsif ($opt eq 'hdr')    { $view= 'header'; }
--- 110,117 ----
      elsif ($opt eq 'out')    { $out_file=      $val || shift (@ARGV); }
      elsif ($opt eq 'find')   { $find_pattern=  $val || shift (@ARGV); } # TODO: allow multiple patterns!
!     elsif ($opt eq 'search' || $opt eq 'select')
!     { # TODO: allow multiple searches!
!       $search_string= $val || shift (@ARGV);
!     }
      elsif ($opt eq 'max')    { $max_items=     $val || shift (@ARGV); }
      elsif ($opt eq 'hdr')    { $view= 'header'; }