[BACK]Return to cvsweb.conf CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / cvsweb

Annotation of cvsweb/cvsweb.conf, Revision 3.51

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

CVSweb