Changeset 0a03bce in git for doc/pl2doc.pl


Ignore:
Timestamp:
Jul 23, 1999, 3:58:53 PM (24 years ago)
Author:
Olaf Bachmann <obachman@…>
Branches:
(u'spielwiese', '91e5db82acc17434e4062bcfa44e6efa7d41fd30')
Children:
860ca828c753022a381780da2d84e66cd6e47314
Parents:
0b4b972fc5519650d1d74cd70a3bad342283c083
Message:
* vertical toolbar
* acroread buttons
* chapter platform


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

Legend:

Unmodified
Added
Removed
  • doc/pl2doc.pl

    r0b4b97 r0a03bce  
    11#!/usr/local/bin/perl
    2 # $Id: pl2doc.pl,v 1.3 1999-07-22 14:51:32 obachman Exp $
     2# $Id: pl2doc.pl,v 1.4 1999-07-23 13:58:34 obachman Exp $
    33###################################################################
    44#  Computer Algebra System SINGULAR
     
    99$Usage = <<EOT;
    1010Usage: 
    11 $0 [-o out_file -db db_file -no_ex -no_fun] library_perl_file.doc
     11$0 [-o out_file -db db_file -no_ex -no_fun -doc] library_perl_file.doc
    1212Convert library_perl_file.pl to library_perl_file.doc
    1313EOT
     
    2222  if (/^-db$/) { $db_file = shift(@ARGV); next;}
    2323  if (/^-no_fun$/)    { $no_fun = 1;next;}
    24   if (/^-h(elp)?$/)      { print $Usage; exit;}
     24  if (/^-h(elp)?$/)   { print $Usage; exit;}
    2525  die "Error: Unknown option: $_:$Usage\n";
    2626}
Note: See TracChangeset for help on using the changeset viewer.