Changeset 280e7f in git for doc/doc2tex.pl
- Timestamp:
- Jul 15, 1999, 7:06:13 PM (24 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')
- Children:
- a9f4d23d75a5fc6f713af7fa68bc84b6d9835daa
- Parents:
- 50916788b142aba5bfbca122c6a90d26e3699f9f
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
doc/doc2tex.pl
r509167 r280e7f 1 1 #!/usr/local/bin/perl 2 # $Id: doc2tex.pl,v 1. 6 1999-07-15 14:15:06obachman Exp $2 # $Id: doc2tex.pl,v 1.7 1999-07-15 17:06:11 obachman Exp $ 3 3 ################################################################### 4 4 # Computer Algebra System SINGULAR … … 556 556 print LDOC ", " . $lib ."_lib\n"; 557 557 print LDOC "\@subsection " . $procs[$i] . "\n"; 558 print LDOC "\@findex ". $procs[$i] . "\n"; 559 print LDOC "\@cindex ". $procs[$i] . "\n" if ($lib eq "standard"); 558 print LDOC "\@cindex ". $procs[$i] . "\n"; 560 559 561 560 print LDOC "\@c ---content $procs[$i]---\n"; 561 print LDOC "Procedure from library \@code{$lib.lib} (\@pxref{${lib}_lib}).\n\n"; 562 562 print LDOC "\@table \@asis\n"; 563 563 $table_is_open = 1; … … 745 745 if ($text =~ /\w/) 746 746 { 747 print $FH "\n" .'@item @strong{Purpose:'."}\n";747 print $FH '@item @strong{Purpose:'."}\n"; 748 748 print $FH lc $text; 749 749 } … … 757 757 if ($item =~ /usage/i || $item =~ /Return/i); 758 758 759 print $FH "$_\n \n";759 print $FH "$_\n"; 760 760 } 761 761 return ''; … … 778 778 { 779 779 print $FH "\@item \@code{$proc($procargs)} "; 780 print $FH "\n\@ findex $proc\n$_\n";780 print $FH "\n\@cindex $proc\n$_\n"; 781 781 } 782 782 }
Note: See TracChangeset
for help on using the changeset viewer.