Annotation of cvsweb/cvsweb.conf, Revision 3.74
3.1 knu 1: # -*-perl-*-
2: # Configuration of cvsweb.cgi, the
3: # CGI interface to CVS Repositories.
4: #
5: # (c) 1998-1999 H. Zeller <zeller@think.de>
6: # 1999 H. Nordstrom <hno@hem.passagen.se>
3.30 knu 7: # 2000-2002 A. MUSHA <knu@FreeBSD.org>
3.65 scop 8: # 2002-2004 V. Skyttä <scop@FreeBSD.org>
3.1 knu 9: # based on work by Bill Fenner <fenner@FreeBSD.org>
3.28 knu 10: #
3.30 knu 11: # $FreeBSD$
3.27 knu 12: # $Id: cvsweb.conf,v 3.29 2001/07/23 09:14:52 hzeller Exp $
3.28 knu 13: # $Idaemons: /home/cvs/cvsweb/cvsweb.conf,v 3.27 2001/08/01 09:48:39 knu Exp $
3.1 knu 14: #
15: ###
16:
3.19 knu 17: # Set the path for the following commands:
3.47 scop 18: # cvs, rlog, rcsdiff
3.19 knu 19: # gzip (if you enable $allow_compress)
3.47 scop 20: # (g)tar, zip (if you enable $allow_tar)
3.42 scop 21: # cvsgraph (if you enable $allow_graph)
3.71 scop 22: # enscript (if you enable $allow_enscript)
3.58 scop 23: #
3.73 scop 24: @command_path = qw(/bin /usr/bin /usr/local/bin);
3.19 knu 25:
3.47 scop 26: # Search the above directories for each command (prefer gtar over tar).
3.58 scop 27: #
3.71 scop 28: for (qw(cvs rlog rcsdiff gzip gtar zip cvsgraph enscript)) {
3.26 knu 29: $CMD{$_} = search_path($_);
3.19 knu 30: }
3.47 scop 31: $CMD{tar} = delete($CMD{gtar}) if $CMD{gtar};
32: $CMD{tar} ||= search_path('tar');
3.19 knu 33:
3.53 scop 34: # CVS roots
35: #
36: # CVSweb can handle several CVS repositories at once. Enter short (internal)
37: # symbolic repository names, their names in the UI and the actual locations
38: # here. The repositories will be listed in the order they're specified here.
39: #
40: # Note that only local repositories are currently supported. Things like
41: # :pserver:someone@xyz.com:/data/cvsroot won't work.
42: #
43: # 'symbolic_name' => ['Name to display', '/path/to/cvsroot']
44: #
3.17 knu 45: @CVSrepositories = (
3.53 scop 46: 'local' => ['Local Repository', '/home/cvs'],
47: # 'freebsd' => ['FreeBSD', '/home/ncvs'],
48: # 'openbsd' => ['OpenBSD', '/home/ncvs'],
49: # 'netbsd' => ['NetBSD', '/home/ncvs'],
50: # 'ruby' => ['Ruby', '/var/anoncvs/ruby'],
3.26 knu 51: );
3.1 knu 52:
3.53 scop 53: # The default CVS root. Note that @CVSrepositories is list, not a hash,
54: # so you'll want to use 2 * 0-based-index-number here; or set this directly
55: # to the default's symbolic name. Unless specified, the first valid one in
56: # @CVSrepositories is used as the default.
57: #
58: # For example:
59: #
60: #$cvstreedefault = $CVSrepositories[2 * 0];
61: #$cvstreedefault = 'local';
3.1 knu 62:
63: ##############
3.15 knu 64: # Bug tracking system options
65: # ("PR" means Problem Report, as in GNATS)
3.1 knu 66: ##############
3.15 knu 67: #@prcategories = qw(
3.26 knu 68: # advocacy
69: # alpha
70: # bin
71: # conf
72: # docs
73: # gnu
74: # i386
75: # kern
76: # misc
77: # pending
78: # ports
79: # sparc
80: #);
81:
3.15 knu 82: #$prcgi = "http://www.FreeBSD.org/cgi/query-pr.cgi?pr=%s";
3.58 scop 83:
3.15 knu 84: #$prkeyword = "PR";
3.1 knu 85:
86: ##############
3.15 knu 87: # Manual gateway
3.8 knu 88: ##############
3.26 knu 89: $mancgi =
90: "http://www.FreeBSD.org/cgi/man.cgi?apropos=0&sektion=%s&query=%s&manpath=FreeBSD+5.0-current&format=html";
3.1 knu 91:
92: ##############
93: # Defaults for UserSettings
94: ##############
95: %DEFAULTVALUE = (
3.26 knu 96:
97: # sortby: File sort order
98: # file Sort by filename
99: # rev Sort by revision number
100: # date Sort by commit date
101: # author Sort by author
102: # log Sort by log message
103: "sortby" => "file",
104:
3.46 scop 105: # ignorecase: ignore case in sorts (filenames, authors, log messages)
106: # 0 Honour case
107: # 1 Ignore case
108: "ignorecase" => "0",
109:
3.26 knu 110: # hideattic: Hide or show files in Attic
111: # 1 Hide files in Attic
112: # 0 Show files in Attic
113: "hideattic" => "1",
114:
115: # logsort: Sort order for CVS logs
116: # date Sort revisions by date
117: # rev Sort revision by revision number
118: # cvs Don't sort them. Same order as CVS/RCS shows them.
119: "logsort" => "date",
120:
121: # f: Default diff format
122: # h Human readable
123: # u Unified diff
124: # c Context diff
125: # s Side by side
3.55 scop 126: # uc Unified diff, enscript colored
127: # cc Context diff, enscript colored
128: # sc Side by side, enscript colored
3.26 knu 129: "f" => "u",
130:
131: # hidecvsroot: Don't show the CVSROOT directory
132: # 1 Hide CVSROOT directory
133: # 0 Show CVSROOT directory
134: "hidecvsroot" => "0",
135:
136: # hidenonreadable: Don't show entries which cannot be read
137: # 1 Hide non-readable entries
138: # 0 Show non-readable entries
139: "hidenonreadable" => "1",
3.49 scop 140:
141: # ln: Show line numbers in HTMLized views
142: # 1 Show line numbers
143: # 0 Don't show line numbers
144: "ln" => "0",
3.1 knu 145: );
146:
147: ##############
148: # some layout stuff
149: ##############
150:
151: # Wanna have a logo on the page ?
3.58 scop 152: #
3.60 scop 153: $logo = '<p><img src="/icons/apache_pb.gif" alt="Powered by Apache" /></p>';
3.1 knu 154:
3.34 scop 155: # The title of the Page on startup. This will be put inside a <h1> tag.
3.58 scop 156: #
3.1 knu 157: $defaulttitle = "CVS Repository";
158:
3.34 scop 159: # The address is shown on the footer. This will be put inside a <address> tag.
3.58 scop 160: #
3.34 scop 161: $address = '<span style="font-size: smaller">FreeBSD-CVSweb <<a href="mailto:freebsd-cvsweb@FreeBSD.org">freebsd-cvsweb@FreeBSD.org</a>></span>';
3.1 knu 162:
163: $long_intro = <<EOT;
164: <p>
165: This is a WWW interface for CVS Repositories.
3.67 scop 166: You can browse the file hierarchy by following directory links (which
167: have slashes after them, e.g. <code>src/</code>).
168: If you follow a link to a file, you will see its revision history.
169: Following a link labeled with a revision number will display that
170: revision of the file. In the revision history view, there is a link
171: near each revision to display diffs between that revision and the
172: previous one, and a form at the bottom of the page that allows you to
3.1 knu 173: display diffs between arbitrary revisions.
3.67 scop 174: </p><p>
3.33 scop 175: This script has been written by Bill Fenner and improved by Henner Zeller,
176: Henrik Nordström, and Ken Coar, then Akinori MUSHA brought it
3.22 knu 177: back to FreeBSD community and made further improvements; it is covered
3.33 scop 178: by <a
179: href="http://www.opensource.org/licenses/bsd-license.html">The BSD Licence</a>.
3.67 scop 180: </p><p>
3.1 knu 181: If you would like to use this CGI script on your own web server and
3.67 scop 182: CVS tree, download the latest version from <<a
3.33 scop 183: href="http://www.FreeBSD.org/projects/cvsweb.html">http://www.FreeBSD.org/projects/cvsweb.html</a>>.
3.67 scop 184: </p><p>
3.33 scop 185: Feel free to send any patches, suggestions and comments to the FreeBSD-CVSweb
186: mailing list at
187: <<a
188: href="mailto:freebsd-cvsweb\@FreeBSD.org">freebsd-cvsweb\@FreeBSD.org</a>>.
3.1 knu 189: </p>
190: EOT
191:
192: $short_instruction = <<EOT;
193: <p>
194: Click on a directory to enter that directory. Click on a file to display
3.32 scop 195: its revision history and to get a chance to display diffs between revisions.
3.1 knu 196: </p>
197: EOT
198:
3.42 scop 199: # Icons for the web UI. If ICON-URL is empty, the TEXT representation is
200: # used. If you do not want to have a tool tip for an icon, set TEXT empty.
201: # The width and height of the icon allow the browser to correctly display
202: # the table while still loading the icons. If these icons are too large,
203: # check out the "mini" versions in the icons/ directory; they have a
204: # width/height of 16/16.
3.58 scop 205: #
3.42 scop 206: my $iconsdir = '/icons';
207:
3.51 scop 208: # format: TEXT ICON-URL width height
3.26 knu 209: %ICONS = (
3.51 scop 210: back => [('[BACK]', "$iconsdir/back.gif", 20, 22)],
211: dir => [('[DIR]', "$iconsdir/dir.gif", 20, 22)],
212: file => [('[TXT]', "$iconsdir/text.gif", 20, 22)],
213: binfile => [('[BINARY]', "$iconsdir/binary.gif", 20, 22)],
214: graph => [('[GRAPH]', "$iconsdir/minigraph.png", 16, 16)],
3.26 knu 215: );
3.15 knu 216: undef $iconsdir;
3.1 knu 217:
3.43 scop 218: # An URL where to find the CSS.
3.58 scop 219: #
3.43 scop 220: $cssurl = '/css/cvsweb.css';
221:
3.1 knu 222: # the length to which the last logentry should
223: # be truncated when shown in the directory view
3.58 scop 224: #
3.1 knu 225: $shortLogLen = 80;
226:
227: # Show author of last change
3.58 scop 228: #
3.1 knu 229: $show_author = 1;
230:
231: ##############
232: # table view for directories
233: ##############
234:
3.40 scop 235: # Cell padding for directory table
3.58 scop 236: #
3.1 knu 237: $tablepadding = 2;
238:
239: # Modules in the repository that should not be displayed, either by default
240: # nor by explicit path specification.
241: #
3.27 knu 242: @HideModules = (
3.74 ! scop 243: # qr|^my/+secret/+module|o,
3.27 knu 244: );
245:
3.69 scop 246: # Files matching these pathnames shouldn't be checked out with CVSweb,
247: # since they may contain sensitive information. These regular expressions
248: # are compared against file names relative to the CVS root(s), without the
249: # trailing ",v". Often, the CVSROOT/passwd is exposed and some people tend
250: # to check in their .cvspass, though this is a bad idea. These files
251: # shouldn't be readable by default. Thanks to Damian Gryski to point
252: # this out. Note that this affects only files, not directories.
3.58 scop 253: #
3.27 knu 254: @ForbiddenFiles = (
3.74 ! scop 255: qr|^CVSROOT/+passwd$|o, # CVSROOT/passwd should not be 'cvs add'ed though.
! 256: qr|/\.cvspass$|o, # Ditto. Just in case.
3.27 knu 257: );
3.1 knu 258:
3.69 scop 259: # Use CVSROOT/descriptions for describing the directories/modules
260: # See INSTALL, section 9.
3.1 knu 261: #
262: $use_descriptions = 0;
263:
264: ##############
265: # Human Readable Diff
266: ##############
267:
268: # (c) 1998 H. Zeller <zeller@think.de>
269: #
270: # Generates two columns of color encoded
271: # diff; much like xdiff or emacs-ediff mode.
272: #
273: # The diff-stuff is a piece of code I once made for
274: # cvs2html which is under GPL,
275: # see http://www.sslug.dk/cvs2html
276: # (c) 1997/98 Peter Toft <pto@sslug.imm.dtu.dk>
277: #
278: # some parameters to screw:
279: ##
280:
281: # make lines breakable so that the columns do not
282: # exceed the width of the browser
3.58 scop 283: #
3.1 knu 284: $hr_breakable = 1;
285:
3.4 knu 286: # give out function names in diffs
3.1 knu 287: # this just makes sense if we have C-files, otherwise
288: # diff's heuristic doesn't work well ..
289: # ( '-p' option to diff)
3.58 scop 290: #
3.4 knu 291: $showfunc = 1;
3.1 knu 292:
293: # For each pair of regexps, files that match the first regexp will be diff'ed
294: # with an '-F' option with the second regexp.
3.58 scop 295: #
3.4 knu 296: %funcline_regexp = (
3.74 ! scop 297: qr/\.(?:4th|fr)$/o => "\\(^\\|[ \t]\\): ",
! 298: qr/\.rb$/o => "^[\t ]*\\(class\\|module\\|def\\) ",
3.26 knu 299: );
3.1 knu 300:
301: # ignore whitespaces for human readable diffs
302: # (indendation and stuff ..)
303: # ( '-w' option to diff)
3.58 scop 304: #
3.7 knu 305: $hr_ignwhite = 0;
3.1 knu 306:
307: # ignore diffs which are caused by
308: # keyword-substitution like $Id - Stuff
309: # ( '-kk' option to rcsdiff)
3.58 scop 310: #
3.1 knu 311: $hr_ignkeysubst = 1;
312:
313: # the width of the textinput of the
314: # request-diff-form
3.58 scop 315: #
3.1 knu 316: $inputTextSize = 12;
3.70 scop 317:
318: # Custom per MIME type diff tools, used for comparing binary files such as
319: # spreadsheets, images etc. Each key is a MIME type in lowercase.
320: # Each value is an array ref of available diff tools for that type, each of
321: # which is a hash ref with values (mandatory where default not listed):
322: # name: the name to show in the UI for this diff type
323: # cmd: full path to executable
324: # args: arguments as an array ref (not string!, defaults to no arguments)
325: # type: output MIME type (defaults to text/plain)
326: #
327: %DIFF_COMMANDS = (
328: #'text/xml' => [
329: # { name => 'XMLdiff',
330: # cmd => $CMD{xmldiff},
331: # },
332: # { name => 'XMLdiff (XUpdate)',
333: # cmd => $CMD{xmldiff},
334: # args => [ qw(-x) ],
335: # type => 'text/xml',
336: # },
337: #],
338: );
3.1 knu 339:
340: ##############
341: # Mime Types
342: ##############
343:
3.52 scop 344: # The MIME type lookup works like this:
345: # 1) Look up from %MTYPES below with the file name extension (suffix).
346: # 2) If not found, use the MIME::Types(3) module if it's available.
347: # 3) If not found, lookup from the $mime_types file (see below).
348: # 4) If not found, try %MTYPES{'*'}.
349: # 5) If not found, use 'application/octet-stream' if the file's keyword
350: # substitution mode is b (ie. the file was checked in as binary to CVS),
351: # 'text/plain' otherwise.
3.1 knu 352:
3.52 scop 353: # Quick MIME type lookup; maps filename extensions to MIME types.
354: # Add common mappings here for fast lookup. You can also use this
355: # to override MIME::Types(3) or the $mime_types file (see below).
3.58 scop 356: #
3.1 knu 357: %MTYPES = (
3.26 knu 358: "html" => "text/html",
359: "shtml" => "text/html",
360: "gif" => "image/gif",
361: "jpeg" => "image/jpeg",
362: "jpg" => "image/jpeg",
363: "png" => "image/png",
364: "xpm" => "image/xpm",
3.52 scop 365: # "*" => "text/plain",
3.26 knu 366: );
3.52 scop 367:
368: # The traditional mime.types file, eg. the one from Apache is fine.
369: # See above where this gets used.
3.58 scop 370: #
3.52 scop 371: $mime_types = '/usr/local/etc/apache/mime.types';
3.11 knu 372:
3.56 scop 373: # Charset appended to the Content-Type HTTP header for text/* MIME types.
374: # Note that the web server may default to some charset which may take effect
375: # if you leave this parameter empty or unset.
3.69 scop 376: # For Apache, see also the AddDefaultCharset directive.
3.56 scop 377: #
3.13 knu 378: $charset = '';
3.26 knu 379:
3.13 knu 380: # e.g.
381: #$charset = $where =~ m,/ru[/_-], ? 'koi8-r'
382: # : $where =~ m,/zh[/_-], ? 'big5'
383: # : $where =~ m,/ja[/_-], ? 'x-euc-jp'
384: # : $where =~ m,/ko[/_-], ? 'x-euc-kr'
385: # : 'iso-8859-1';
3.29 knu 386:
387: # Output filter
3.58 scop 388: #
3.29 knu 389: $output_filter = '';
390:
391: # e.g.
392: ## unify/convert Japanese code into EUC-JP
393: #$output_filter= '/usr/local/bin/nkf -e';
3.1 knu 394:
395: ##############
396: # Misc
397: ##############
3.58 scop 398:
3.50 scop 399: # Allow annotation of files. See also @annotate_options below.
3.58 scop 400: #
3.1 knu 401: $allow_annotate = 1;
402:
403: # allow pretty-printed version of files
3.58 scop 404: #
3.1 knu 405: $allow_markup = 1;
406:
3.31 knu 407: # allow extra hlink formatting (such as PR xrefs) in logs
3.58 scop 408: #
3.31 knu 409: $allow_log_extra = 1; # default: enabled
410:
411: # allow extra hlink formatting (such as PR xrefs) in directories
3.58 scop 412: #
3.31 knu 413: $allow_dir_extra = 1;
414:
415: # allow extra hlink formatting in source code/formatted diff views
3.58 scop 416: #
3.31 knu 417: $allow_source_extra = 1;
418:
3.1 knu 419: # allow compression with gzip
420: # of output if the Browser accepts
421: # it (HTTP_ACCEPT_ENCODING=gzip)
422: # [make sure to have gzip in the path]
3.58 scop 423: #
3.16 knu 424: $allow_compress = 0;
3.1 knu 425:
426: # Make use of javascript functions.
427: # This way you can select one of your CVSroot
428: # without pressing 'Go' (.. if you do have more
429: # than one CVSROOT defined)
3.58 scop 430: #
3.1 knu 431: $use_java_script = 1;
432:
3.58 scop 433: # Whether to show a form for setting options in the directory view.
434: #
435: $edit_option_form = 1;
3.1 knu 436:
437: # Show last changelog message for sub directories
438: # The current implementation makes many assumptions and may show the
439: # incorrect file at some times. The main assumption is that the last
440: # modified file has the newest filedate. But some CVS operations
441: # touches the file without even when a new version is't checked in,
442: # and TAG based browsing essientially puts this out of order, unless
443: # the last checkin was on the same tag as you are viewing.
444: # Enable this if you like the feature, but don't rely on correct results.
3.58 scop 445: #
3.1 knu 446: $show_subdir_lastmod = 0;
447:
448: # Show CVS log when viewing file contents
3.58 scop 449: #
3.1 knu 450: $show_log_in_markup = 1;
451:
3.13 knu 452: # Preformat when viewing file contents. This should be turned off
453: # when you have files in the repository that are in a multibyte
454: # encoding which uses HTML special characters ([<>&"]) as part of a
455: # multi-byte character. (such as iso-2022-jp, ShiftJIS, etc.)
456: # Otherwise those files will get screwed up in markup.
3.58 scop 457: #
3.59 scop 458: # Note: enscript(1) highlighting is preferred over the built-in preformatting,
459: # ie. this has no effect if $allow_enscript is true and enscript can highlight
460: # the file.
461: #
462: $preformat_in_markup = 0;
3.13 knu 463:
3.1 knu 464: # Tabstop used to expand tabs in colored diffs. If undefined then
465: # tabs are always expanded to 8 spaces.
3.58 scop 466: #
3.1 knu 467: $tabstop = 8;
468:
3.58 scop 469: # If you wish to display absolute times in your local timezone,
3.1 knu 470: # then define mytz and fill in the strings for your standard and
471: # daylight time. Note that you must also make sure the system
472: # timezone is correctly set.
3.58 scop 473: #
474: #@mytz=("EST", "EDT");
3.1 knu 475:
3.69 scop 476: # CVSweb is friendly to caches by indicating a suitable
3.1 knu 477: # last-modified timestamp. Doing this uses slightly more
478: # CPU so you might want to disable it if you have a slow
479: # server
3.58 scop 480: #
3.1 knu 481: $use_moddate = 1;
482:
3.45 scop 483: # Maximum number of filenames to pass to rlog(1) in one command.
484: # If you see "Failed to spawn GNU rlog" errors with directories containing
485: # lots of files, experiment by setting this to different values and see if
486: # the error still occurs. A good value to start from would be eg. 200.
487: # Just comment this out if you're not bitten by the problem.
3.57 scop 488: #
3.45 scop 489: #$file_list_len = 200;
490:
3.57 scop 491: # Allows graphical representations of file logs with CvsGraph if set to a
492: # true value.
493: #
494: $allow_cvsgraph = $CMD{cvsgraph} ? 1 : 0;
495:
3.42 scop 496: # Path to the CvsGraph configuration file. Only used if $allow_cvsgraph
497: # is true. Leave this empty or comment it out to make cvsgraph(1) use its
498: # default configuration file.
3.57 scop 499: #
3.42 scop 500: #$cvsgraph_config = "/etc/cvsgraph.conf";
3.13 knu 501:
3.57 scop 502: # Whether to allow downloading a tarball or a zip of the current directory.
503: # While downloading of the entire repository is disallowed, depending on
504: # the directory this may take a lot of time and disk space. For some CVS
3.69 scop 505: # versions, the user account running CVSweb needs write access to
3.57 scop 506: # CVSROOT/val-tags. See also the tar, gzip and zip options below.
507: #
508: #$allow_tar = (($CMD{tar} && $CMD{gzip}) || $CMD{zip}) ? 1 : 0;
509:
3.13 knu 510: # Options to pass to tar(1).
3.57 scop 511: # For example: @tar_options = qw(--ignore-failed-read);
512: # GNU tar has some useful options against unexpected errors.
513: # Other useful options include "--owner=0" and "--group=0", see
514: # the tar(1) (or gtar(1)) manpage for details.
515: #
3.15 knu 516: @tar_options = qw();
3.26 knu 517:
3.19 knu 518: # Options to pass to gzip(1) when compressing a tarball to download.
3.57 scop 519: # For example: @gzip_options = qw(-3);
520: # Try lower compression level than 6 (default) if you want faster
521: # compression, or higher for better compression.
522: #
3.19 knu 523: @gzip_options = qw();
3.26 knu 524:
3.25 knu 525: # Options to pass to zip(1) when compressing a zip archive to download.
3.57 scop 526: # For example: @zip_options = qw(-3);
527: # Try lower compression level than 6 (default) if you want faster
528: # compression, or higher for better compression.
529: #
3.47 scop 530: @zip_options = qw(-q);
3.26 knu 531:
3.13 knu 532: # Options to pass to cvs(1).
3.63 scop 533: # For cvs versions 1.11 to 1.11.6 (broken in < 1.11, removed in 1.11.7), you
534: # can use the '-l' option to prevent cvs from writing to the history file.
535: # For other cvs versions, either suppress history logging by using the
3.69 scop 536: # LogHistory parameter in CVSROOT/config or make sure that the CVSweb user
3.63 scop 537: # can read and write to CVSROOT/history.
3.61 scop 538: # FreeBSD's and OpenBSD's cvs(1) has long since supported -R (read only access
539: # mode) option, which considerably speeds up checkouts over NFS. For other
3.62 scop 540: # platforms, the -R option and the CVSREADONLYFS environment variable are
541: # available in cvs >= 1.12.1. A similar effect is provided by -u on NetBSD.
3.57 scop 542: #
3.35 scop 543: @cvs_options = qw(-lf);
3.47 scop 544: push @cvs_options, '-R' if ($^O eq 'freebsd' || $^O eq 'openbsd');
545: push @cvs_options, '-u' if ($^O eq 'netbsd');
3.62 scop 546: # Only affects cvs >= 1.12.1, but doesn't hurt older ones.
547: $ENV{CVSREADONLYFS} = 1 unless exists($ENV{CVSREADONLYFS});
3.26 knu 548:
3.39 scop 549: # Options to pass to the 'cvs annotate' command, usually the normal
550: # @cvs_options are good enough here.
3.57 scop 551: # To make annotate work against a read only repository, add -n, ie.:
552: # @annotate_options = (@cvs_options, '-n');
553: #
3.39 scop 554: @annotate_options = @cvs_options;
555:
3.54 scop 556: # Options to pass to rcsdiff(1).
557: # Probably the only useful one here is -q (suppress diagnostic output).
3.57 scop 558: #
3.54 scop 559: @rcsdiff_options = qw(-q);
3.48 scop 560:
561: # Enables syntax highlighting using GNU Enscript if set.
3.64 scop 562: # You will need GNU Enscript version 1.6.3 or newer for this to work.
3.57 scop 563: #
3.48 scop 564: #$allow_enscript = $CMD{enscript} ? 1 : 0;
565:
566: # Options to pass to enscript(1).
3.54 scop 567: # Do not set the -q, --language, -o or --highlight options here.
3.48 scop 568: # Most useful styles are probably emacs, emacs_verbose and msvc.
3.57 scop 569: #
3.48 scop 570: @enscript_options = qw(--style=emacs --color=1);
571:
572: # Enscript highlight rule to filename regex mappings. The set of useful
573: # mappings depends on what highlight rules the system has installed.
3.57 scop 574: #
3.48 scop 575: %enscript_types =
576: (
577: 'ada' => qr/\.ad(s|b|a)$/o,
578: 'asm' => qr/\.[Ss]$/o,
579: 'awk' => qr/\.awk$/o,
580: 'bash' => qr/\.(bash(_profile|rc)|inputrc)$/o,
581: 'c' => qr/\.(c|h)$/o,
582: 'changelog' => qr/^changelog$/io,
583: 'cpp' => qr/\.(c\+\+|C|H|cpp|cc|cxx)$/o,
584: 'csh' => qr/\.(csh(rc)?|log(in|out)|history)$/o,
585: 'elisp' => qr/\.e(l|macs)$/o,
586: 'fortran' => qr/\.[fF]$/o,
587: 'haskell' => qr/\.(l?h|l?g)s$/o,
588: 'html' => qr/\.x?html?$/o,
589: 'idl' => qr/\.idl$/o,
590: 'inf' => qr/\.inf$/io,
591: 'java' => qr/\.java$/o,
592: 'javascript' => qr/\.js$/o,
593: 'ksh' => qr/\.ksh$/o,
594: 'm4' => qr/\.m4$/o,
595: 'makefile' => qr/((GNU)?[Mm]akefile.*|\.(ma?ke?|am)$)/o,
596: 'matlab' => qr/\.m$/o,
597: 'nroff' => qr/\.man$/o,
598: 'pascal' => qr/\.p(as|p)?$/io,
599: 'perl' => qr/\.p(m|(er?)l)$/io,
600: 'postscript' => qr/\.e?ps$/io,
601: 'python' => qr/\.py$/o,
602: 'rfc' => qr/\b((rfc|draft)\..*\.txt)$/o,
603: 'scheme' => qr/\.(scm|scheme)$/o,
604: 'sh' => qr/\.sh$/o,
605: 'skill' => qr/\.il$/o,
606: 'sql' => qr/\.sql$/o,
607: 'states' => qr/\.st$/o,
608: 'synopsys' => qr/\.s(cr|yn(th)?)$/o,
609: 'tcl' => qr/\.tcl$/o,
610: 'tcsh' => qr/\.tcshrc$/o,
611: 'tex' => qr/\.tex$/o,
612: 'vba' => qr/\.vba$/o,
613: 'verilog' => qr/\.(v|vh)$/o,
614: 'vhdl' => qr/\.vhdl?$/o,
615: 'vrml' => qr/\.wrl$/o,
616: 'wmlscript' => qr/\.wmls(cript)?$/o,
617: 'zsh' => qr/\.(zsh(env|rc)|z(profile|log(in|out)))$/o,
618: );
3.39 scop 619:
3.12 knu 620: 1;
3.26 knu 621:
3.57 scop 622: # EOF
CVSweb