Changeset 69dd39 in git

Timestamp:

Aug 17, 1999, 2:06:10 PM (25 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

b9c138ac7309447a5f55b6e073238af293040a47

Parents:

6ffa8426093a37e6a8e07f77943fcf41e062748a

Message:

* command-line option parsing improved


git-svn-id: file:///usr/local/Singular/svn/trunk@3467 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• emacs/cmpl.pl (modified) (2 diffs)

emacs/cmpl.pl

@@ -1 +1 @@
 #!/usr/local/bin/perl
-# $Id: cmpl.pl,v 1.3 1999-08-16 11:10:09 obachman Exp $
+# $Id: cmpl.pl,v 1.4 1999-08-17 12:06:10 obachman Exp $
 ###################################################################
 #
@@ -26 +26 @@
   $_ = shift(@ARGV);
   if (/^-S(ingular)?$/)  { $Singular = shift(@ARGV); next;}
-  if (/^-h(lp)?$/)       { $hlp = shift(@ARGV); next;}
+  if (/^-hlp$/)          { $hlp = shift(@ARGV); next;}
   if (/^-c(mpl)?$/)      { $cmpl = shift(@ARGV); next;}
   if (/^-h(elp)?$/)      { print $Usage; exit;}