Changeset 0b59f5 in git for doc/pl2doc.pl

Timestamp:

Dec 13, 1999, 4:33:50 PM (24 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

82ed244cff3158b7a79a6eed4e0548d485960cfe

Parents:

925cab8e04ecb2f3c2e451b913c11bcac28b2374

Message:

* GMG's changes


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

File:

• doc/pl2doc.pl (modified) (2 diffs)

doc/pl2doc.pl

@@ -1 +1 @@
 #!/usr/local/bin/perl
-# $Id: pl2doc.pl,v 1.12 1999-12-10 16:41:50 obachman Exp $
+# $Id: pl2doc.pl,v 1.13 1999-12-13 15:32:46 obachman Exp $
 ###################################################################
 #  Computer Algebra System SINGULAR
@@ -392 +392 @@
     {
       print $FH '@item @strong{Purpose:'."}\n";
-      print $FH lc $text;
+      if ($text !~ /[a-z]*/)
+      {
+        print $FH lc $text;
+      }
+      else
+      {
+        print $FH $text;
+      }
     }
   }