Changeset 1173547 in git for doc/doc2tex.pl

Timestamp:

Dec 10, 1999, 5:41:51 PM (23 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

131a5790de5c119bcc15d738ae2528f187966154

Parents:

a82cbf7acd39c9cda284cc9c53921da9d5371095

Message:

* some of GMG's changes


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

File:

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

doc/doc2tex.pl

@@ -1 +1 @@
 #!/usr/local/bin/perl
-# $Id: doc2tex.pl,v 1.22 1999-12-06 16:06:54 obachman Exp $
+# $Id: doc2tex.pl,v 1.23 1999-12-10 16:41:48 obachman Exp $
 ###################################################################
 #  Computer Algebra System SINGULAR
@@ -350 +350 @@
         # break after $ex_length characters
         $to_do = $_;
-        while (length($to_do) > $ex_length && $to_do =~ /\w/)
+        while (length($to_do) > $ex_length && $to_do =~ /\w/ &&  
+               substr($to_do, $ex_length) !~ /^\s*$/)
         {
+          
           $done .= substr($to_do, 0, $ex_length)."\\\n   ";
-          $to_do = substr($to_do, $ex_length + 1);
+          $to_do = substr($to_do, $ex_length);
         }
         $_ = $done.$to_do if($done);