diff --git a/CHANGES b/CHANGES index ba8a655..ccef222 100644 --- a/CHANGES +++ b/CHANGES @@ -12,6 +12,36 @@ all changes that will be visible to users of MHonArc. YYYY/MM/DD +============================================================================ +2003/07/19 (2.6.5) + +* Bug Fixes: + + Bug ID Summary + ------ ------------------------------------------------------------ + 4126 Typo in mhopt.pl causes error message for big5 + character set + 4315 allowcomments' directive to filter() is ignored + ------ ------------------------------------------------------------ + + +* An architecture independent RPM package is now provided for + installation. Because of this, the package name format has slightly + changed to be consistent RPM, and other, package managers: + + Old format New Format + ------------- ------------- + MHonArcX.X.X MHonArc-X.X.X + + Installation document has been updated to reflect this change. + + If you create third-party distribution bundles for MHonArc, you may + need to update your bundling process to take account of this change, + mainly because the directory created when extracting the tar or + zip bundles now include the hyphen. + ============================================================================ 2003/06/20 (2.6.4) @@ -2486,4 +2516,4 @@ YYYY/MM/DD ======================================================================= Earl Hood, mhonarc@mhonarc.org -$Id: CHANGES,v 1.111 2003/06/20 18:28:59 ehood Exp $ +$Id: CHANGES,v 1.112 2003/07/20 03:27:49 ehood Exp $ diff --git a/INSTALL b/INSTALL index 2775118..70c62ea 100644 --- a/INSTALL +++ b/INSTALL @@ -13,8 +13,10 @@ NOTE: Make sure to read the release notes before installing MHonArc, MHonArc distribution. * For the Impatient + * Vendor Supplied Packages * System Requirements * Downloading MHonArc + * RPM Installation * Extracting the MHonArc Distribution * Installing with install.me + install.me Notes @@ -31,21 +33,68 @@ NOTE: Make sure to read the release notes before installing MHonArc, For the Impatient -If you cannot wait to get going, try the following: +If you cannot wait to get going, try one of the following: -+-------------------------------------------------------------------------+ -|prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArcX.X.X' | -|prompt> gzip -dc MHonArcX.X.X | tar xvf - | -|prompt> cd MHonArcX.X.X | -|prompt> perl install.me | -+-------------------------------------------------------------------------+ + * Plaform independent install: + +---------------------------------------------------------------------------+ + |prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArc-X.X.X.tar.gz' | + |prompt> gzip -dc MHonArc-X.X.X.tar.gz | tar xvf - | + |prompt> cd MHonArc-X.X.X | + |prompt> perl install.me | + +---------------------------------------------------------------------------+ + + * RPM install: + +---------------------------------------------------------------------------------+ + |prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArc-X.X.X-n.noarch.rpm' | + |prompt> rpm -Uvh MHonArc-X.X.X-1.noarch.rpm | + +---------------------------------------------------------------------------------+ -where X.X.X represents the version number. +Where X.X.X represents the version number, and X.X.X-n represents the +version and release number of the RPM. Generally, the release number is +equal to '1'. If there were problems doing the above, then keep reading. --------------------------------------------------------------------------- +Vendor Supplied Packages + +Some software system vendors provide MHonArc, usually as an optional +package. The following links provide vendor-supplied versions of MHonArc: + +Debian GNU/Linux + +Linux (multiple vendors/distros) + + +NOTE: Choosing to go with a vendor-supplied package depends on your needs. + Here are some things to consider: + + * Some vendors may have their own QA process along with their own + support services while others may provide MHonArc as a + contributed package with no additional support. + + * Vendor/distro versions of MHonArc tend not to reflect the latest + release since there is a latency between a new release made + available from mhonarc.org to when vendors are able to download + and create their own packages. This difference can be important + depending on what MHonArc features or fixes you need. + + In general, if your vendor provides their own QA and support services + for the software they provide, it is usually best to use the vendor's + version of MHonArc. However, if the vendor does not provide + additional support, and/or you need the latest features and fixes, + you may want go with what is provided from mhonarc.org. + + If you require professional support and consulting, see Contacts for + contact information. + +This document does not cover any installation details for vendor supplied +packages. See your vendor's supplied documentation for installation +instructions. + +--------------------------------------------------------------------------- + System Requirements The following is required to run MHonArc: @@ -79,41 +128,86 @@ The following is required to run MHonArc: Downloading MHonArc The homepage for MHonArc is . The homepage list -various sites that you can download MHonArc. If you are familiar with -Comprehensive Perl Archive Network (CPAN), MHonArc can be downloaded from -. +various sites that you can download MHonArc. MHonArc is distributed in the following formats: - * tar-bz2: MHonArcX.X.X.tar.bz2 - * tar-gzip: MHonArcX.X.X.tar.gz - * zip: MHonArcX.X.X.zip + * RPM: MHonArc-X.X.X-n.noarch.rpm + * tar-bz2: MHonArc-X.X.X.tar.bz2 + * tar-gzip: MHonArc-X.X.X.tar.gz + * zip: MHonArc-X.X.X.zip + +Where X.X.X represents the version number, and X.X.X-n represents the +version and release number of the RPM. Generally, the release number is +equal to '1'. Choose the format that best suits your environment. + +NOTE: Alternate distribution formats for MHonArc may be available from + third-parties. Alternate distribution formats are not covered in this + document. + +If you downloaded the RPM distribution, goto RPM Installation. If you +downloaded one of the other formats, goto Extracting the MHonArc +Distribution. + +--------------------------------------------------------------------------- + +RPM Installation + +RPM is a widely used software package manager for various Linux-based +systems and sometimes used for other Unix-based environments. If the +software on your system is managed by RPM, you may prefer to install +MHonArc via RPM: + ++-------------------------------------------------------------------------+ +|prompt> rpm -Uvh MHonArc-X.X.X-n.noarch.rpm | ++-------------------------------------------------------------------------+ -where X.X.X represents the version number. +NOTE: RPM-based installation requires that the perl executable is located + at /usr/bin/perl. -Alternate distribution formats for MHonArc may be available, like Linux -RPM. Alternate distribution formats are not covered in this document. +MHonArc files will be installed in the following locations: + +/usr/bin: Program files: mhonarc, mha-dbedit, ... +/usr/lib/MHonArc: Library files. +/usr/share/doc/MHonArc-X.X.X: Documentation, examples, and extras. +/usr/share/man/man1: Manpages. + +It is highly likely that you will need to have root priviledges to install +via RPM. If you do not have root access, or you want to install in a +non-standard location, you will need to install MHonArc from the non-RPM +bundles. + +Once the install is completed, you can skip to Post Installation +Configuration. + +NOTE: RPM distributions have been directly available starting with MHonArc + v2.6.5. However, alternate RPM packages are available for current and + older versions via third parties and some Linux distros. Goto to get a + list of third-party RPM bundles. --------------------------------------------------------------------------- Extracting the MHonArc Distribution -After downloading MHonArc, it is best to move the file to a temporary -location for extraction. To extract the distribution under Unix-like -systems, use one of the following commands based upon the distribution -format you downloaded: +NOTE: If doing an RPM-based install, goto RPM Installation above. + +After downloading the MHonArc distribution, it is best to move the file to +a temporary location for extraction. To extract the distribution under +Unix-like systems, use one of the following commands based upon the +distribution format you downloaded: tar-bz2 +---------------------------------------------------------------------+ - |prompt> bzip2 -dc MHonArcX.X.X.tar.bz2 | tar xvf - | + |prompt> bzip2 -dc MHonArc-X.X.X.tar.bz2 | tar xvf - | +---------------------------------------------------------------------+ tar-gzip +---------------------------------------------------------------------+ - |prompt> gzip -dc MHonArcX.X.X.tar.gz | tar xvf - | + |prompt> gzip -dc MHonArc-X.X.X.tar.gz | tar xvf - | +---------------------------------------------------------------------+ zip +---------------------------------------------------------------------+ - |prompt> unzip MHonArcX.X.X.zip | + |prompt> unzip MHonArc-X.X.X.zip | +---------------------------------------------------------------------+ For Win32 systems, you can use a program like WinZip to extract the @@ -125,18 +219,18 @@ NOTE: If your are using Cygwin and the cygwin build of Perl, then the environment. MHonArc treats the cygwin environment as a Unix-type environment. -After extraction, the subdirectory MHonArcX.X.X will have been created +After extraction, the subdirectory MHonArc-X.X.X will have been created containing all the files comprising MHonArc. NOTE: Please read the release notes before continuing for any news about compatibility with previous versions and/or important usage information. -Now, change your current directory to MHonArcX.X.X for the next step. On a +Now, change your current directory to MHonArc-X.X.X for the next step. On a Unix-type system, the following command will do it: +-------------------------------------------------------------------------+ -|prompt> cd MHonArcX.X.X | +|prompt> cd MHonArc-X.X.X | +-------------------------------------------------------------------------+ --------------------------------------------------------------------------- @@ -386,7 +480,7 @@ highlighting mode. The mode is best used with color-capable terminals. --------------------------------------------------------------------------- -$Date: 2002/12/10 04:08:02 $ +$Date: 2003/07/20 03:27:49 $ MHonArc -Copyright © 1997-2002, Earl Hood, mhonarc@mhonarc.org +Copyright © 1997-2003, Earl Hood, mhonarc@mhonarc.org diff --git a/doc/install.html b/doc/install.html index a351f6d..14c4737 100644 --- a/doc/install.html +++ b/doc/install.html @@ -35,8 +35,10 @@

Installation

  • For the Impatient +
  • Vendor Supplied Packages
  • System Requirements
  • Downloading MHonArc +
  • RPM Installation
  • Extracting the MHonArc Distribution
  • Installing with install.me
      @@ -59,19 +61,95 @@

      Installation

      For the Impatient

      -

      If you cannot wait to get going, try the following: +

      If you cannot wait to get going, try one of the following:

      +
        + +
      • Plaform independent install: 
        -prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArcX.X.X'
-prompt> gzip -dc MHonArcX.X.X | tar xvf -
-prompt> cd MHonArcX.X.X
+prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArc-X.X.X.tar.gz'
+prompt> gzip -dc MHonArc-X.X.X.tar.gz | tar xvf -
+prompt> cd MHonArc-X.X.X
 prompt> perl install.me
-
        -

        where X.X.X represents the version number.

        +
        • + +
      • RPM install: +
        +prompt> wget 'http://www.mhonarc.org/release/MHonArc/MHonArc-X.X.X-n.noarch.rpm'
+prompt> rpm -Uvh MHonArc-X.X.X-1.noarch.rpm
+
        • + +
      +

      Where X.X.X represents the version number, and +X.X.X-n represents the version and release number +of the RPM. Generally, the release number is equal to '1'. +

      If there were problems doing the above, then keep reading.

      + +
      +

      Vendor Supplied Packages

      + +

      Some software system vendors provide MHonArc, usually as an +optional package. The following links provide vendor-supplied +versions of MHonArc: +

      + +
      +
      Debian GNU/Linux
      +
      <http://packages.debian.org/mhonarc> +
      +
      Linux (multiple vendors/distros)
      +
      <http://www.rpmfind.net/linux/rpm2html/search.php?query=MHonArc> +
      +
      + + + + + + +
      NOTE:

      Choosing to go with a vendor-supplied package +depends on your needs. Here are some things to consider: +

      +
        +

      • Some vendors may have their own QA process + along with their own support services while others may provide + MHonArc as a contributed package with no additional support. +

        +
        • +

      • Vendor/distro versions of MHonArc tend not to reflect the + latest release since there is a latency between a new release + made available from + mhonarc.org + to when vendors are able to download and + create their own packages. This difference can be important + depending on what MHonArc features or fixes you need. +

        +
        • +
      +

      In general, if your vendor provides their own QA and support +services for the software they provide, it is usually best to use +the vendor's version of MHonArc. However, if the vendor does not +provide additional support, and/or you need the latest features +and fixes, you may want go with what is provided from +mhonarc.org. +

      +

      If you require professional support and consulting, +see Contacts for +contact information. +

      +
      + +

      This document does not cover any installation details for +vendor supplied packages. See your vendor's supplied documentation +for installation instructions. +

      +

      System Requirements

      @@ -128,51 +206,155 @@

      Downloading MHonArc

      The homepage for MHonArc is <http://www.mhonarc.org/>. The homepage -list various sites that you can download MHonArc. If you are -familiar with -Comprehensive Perl Archive Network -(CPAN), MHonArc can be downloaded from -<http://www.perl.com/CPAN/authors/id/EHOOD/>. +list various sites that you can download MHonArc.

      MHonArc is distributed in the following formats:

        -
      • tar-bz2: MHonArcX.X.X.tar.bz2 +
      • RPM: MHonArc-X.X.X-n.noarch.rpm +
        • +
      • tar-bz2: MHonArc-X.X.X.tar.bz2
        • -
      • tar-gzip: MHonArcX.X.X.tar.gz +
      • tar-gzip: MHonArc-X.X.X.tar.gz
        • -
      • zip: MHonArcX.X.X.zip +
      • zip: MHonArc-X.X.X.zip
      -

      where X.X.X represents the version number. +

      Where X.X.X represents the version number, and +X.X.X-n represents the version and release number +of the RPM. Generally, the release number is equal to '1'. +Choose the format that best suits your environment.

      -

      Alternate distribution formats for MHonArc may be available, like -Linux RPM. Alternate distribution formats are not covered in this + + + + + + +
      NOTE:

      +Alternate distribution formats for MHonArc may be available from +third-parties. Alternate distribution formats are not covered in this document.

      +
      + +

      If you downloaded the RPM distribution, goto +RPM Installation. +If you downloaded one of the other formats, goto +Extracting the MHonArc Distribution. +

      + + +
      +

      RPM Installation

      + +

      RPM is a widely used software +package manager for various Linux-based systems and sometimes used +for other Unix-based environments. If the software on your system is +managed by RPM, you may prefer to install MHonArc via RPM: +

      + +
      +prompt> rpm -Uvh MHonArc-X.X.X-n.noarch.rpm
+
      + +

      + + + + + + +
      NOTE:

      RPM-based installation requires that the perl +executable is located at /usr/bin/perl. +

      +
      + +

      MHonArc files will be installed in the following locations: +

      + + + + + + + + + + + + + + + + + + +
      /usr/bin: Program files: mhonarc, mha-dbedit, ... +
      /usr/lib/MHonArc: Library files. +
      /usr/share/doc/MHonArc-X.X.X: Documentation, examples, and extras. +
      /usr/share/man/man1: Manpages. +
      + +

      It is highly likely that you will need to have root priviledges +to install via RPM. If you do not have root access, or you want +to install in a non-standard location, you will need to +install MHonArc from the non-RPM bundles. +

      + +

      Once the install is completed, you can skip to +Post Installation Configuration. +

      + + + + + + +
      NOTE:

      RPM distributions have been directly +available starting with MHonArc v2.6.5. However, alternate RPM packages +are available for current and older versions via +third parties and some Linux distros. Goto +<http://www.rpmfind.net/linux/rpm2html/search.php?query=MHonArc> to +get a list of third-party RPM bundles. +

      +
      + +

      Extracting the MHonArc Distribution

      -

      After downloading MHonArc, it is best to move the file to a -temporary location for extraction. To extract the distribution -under Unix-like systems, use one of the following commands based upon the -distribution format you downloaded: + + + + + +
      NOTE:

      If doing an RPM-based install, goto +RPM Installation above. +

      +
      + +

      After downloading the MHonArc distribution, it is best to move +the file to a temporary location for extraction. To extract the +distribution under Unix-like systems, use one of the following commands +based upon the distribution format you downloaded:

      +
      tar-bz2
      -prompt> bzip2 -dc MHonArcX.X.X.tar.bz2 | tar xvf -
      +prompt> bzip2 -dc MHonArc-X.X.X.tar.bz2 | tar xvf -
      tar-gzip
      -prompt> gzip -dc MHonArcX.X.X.tar.gz | tar xvf -
      +prompt> gzip -dc MHonArc-X.X.X.tar.gz | tar xvf -
      zip
      -prompt> unzip MHonArcX.X.X.zip
      +prompt> unzip MHonArc-X.X.X.zip
      @@ -194,7 +376,7 @@

      Extracting the MHonArc Distribution

      -

      After extraction, the subdirectory MHonArcX.X.X will +

      After extraction, the subdirectory MHonArc-X.X.X will have been created containing all the files comprising MHonArc.

      @@ -207,12 +389,12 @@

      Extracting the MHonArc Distribution

      -

      Now, change your current directory to MHonArcX.X.X +

      Now, change your current directory to MHonArc-X.X.X for the next step. On a Unix-type system, the following command will do it: 

      -prompt> cd MHonArcX.X.X
+prompt> cd MHonArc-X.X.X
      @@ -570,10 +752,10 @@

      Resource File Editing

      -$Date: 2002/12/10 04:08:02 $
      +$Date: 2003/07/20 03:27:49 $
      MHonArc
      -Copyright © 1997-2002, Earl Hood, mhonarc@mhonarc.org
      diff --git a/doc/mhonarc.html b/doc/mhonarc.html index 8982e13..9a8b91e 100644 --- a/doc/mhonarc.html +++ b/doc/mhonarc.html @@ -44,8 +44,10 @@

      Table of Contents

    • Installation
      • For the Impatient
        • +
      • Vendor Supplied Packages
      • System Requirements
      • Downloading MHonArc
        • +
      • RPM Installation
      • Extracting the MHonArc Distribution
      • Installing with install.me
      • The Perl 5 Way
        • @@ -165,7 +167,7 @@

        Table of Contents

        -$Date: 2003/02/23 00:12:07 $
        +$Date: 2003/07/20 03:27:49 $
        MHonArc
        diff --git a/install.me b/install.me index 8466d31..3a95284 100755 --- a/install.me +++ b/install.me @@ -1,7 +1,7 @@ #!/usr/bin/perl ##---------------------------------------------------------------------------## ## File: -## $Id: install.me,v 1.18 2002/05/14 19:40:46 ehood Exp $ +## $Id: install.me,v 1.19 2003/07/20 00:00:51 ehood Exp $ ## Author: ## Earl Hood, earl@earlhood.com ## Summary: @@ -229,6 +229,8 @@ my %Files = (); my %DefValues = (); my %OptValues = (); +my $Root = ''; + ############################################################################### ## Parse Command-line ############################################################################### @@ -239,6 +241,7 @@ my %OptValues = (); GetOptions(\%OptValues, qw( afs + root=s batch binpath=s docpath=s @@ -260,6 +263,8 @@ my %OptValues = (); exit !$ret; } + $Root = $OptValues{'root'} if defined $OptValues{'root'}; + my $cfg_prefix = interpolate_path($Config{'prefix'}); $DefValues{'binpath'} = interpolate_path($Config{'installbin'}); $DefValues{'libpath'} = interpolate_path($Config{'installsitelib'}); @@ -422,63 +427,71 @@ my %OptValues = (); ## Install files ## ------------- - print STDERR "($OptValues{'perl'})\n"; my $plprefix = "#!$OptValues{'perl'}\n"; $plprefix .= "use lib qw($OptValues{'libpath'});\n" if $OptValues{'libpath'}; my($file, $destfile); if ($dobin) { print STDOUT qq(Installing programs to "$OptValues{'binpath'}":\n); - if (create_dir($OptValues{'binpath'}, 1) <= 0) { die "\n"; } + if (create_dir(apply_root($Root, $OptValues{'binpath'}), 1) <= 0) { + die "\n"; + } foreach (@{$Files{'bin'}}) { print STDOUT " $_ => "; ($file = $_) =~ s%.*/%%o; $destfile = join('', $OptValues{'binpath'}, $DIRSEP, $file); + my $fulldestfile = apply_root($Root, $destfile); print STDOUT $destfile, "\n"; - cp($_, $destfile, $plprefix, $WINDOWS); - eval q{chmod 0755, $destfile;}; + cp($_, $fulldestfile, $plprefix, $WINDOWS); + eval q{chmod 0755, $fulldestfile;}; if ($WINDOWS && $file !~ /\.pl$/i) { - $destfile .= ".pl"; - cp($_, $destfile, $plprefix); - eval q{chmod 0755, $destfile;}; + $fulldestfile .= ".pl"; + cp($_, $fulldestfile, $plprefix); + eval q{chmod 0755, $fulldestfile;}; } } } if ($dolib) { print STDOUT qq(Installing lib files to "$OptValues{'libpath'}":\n); - if (create_dir($OptValues{'libpath'}, 1) <= 0) { die "\n"; } + if (create_dir(apply_root($Root, $OptValues{'libpath'}), 1) <= 0) { + die "\n"; + } foreach (@{$Files{'lib'}}) { print STDOUT " $_ => "; ($file = $_) =~ s%.*/%%o; $destfile = join('', $OptValues{'libpath'}, $DIRSEP, $file); print STDOUT $destfile, "\n"; - cp($_, $destfile); + cp($_, apply_root($Root, $destfile)); } } if ($dodoc) { print STDOUT qq(Installing docs to "$OptValues{'docpath'}":\n); - if (create_dir($OptValues{'docpath'}, 1) <= 0) { die "\n"; } + if (create_dir(apply_root($Root, $OptValues{'docpath'}), 1) <= 0) { + die "\n"; + } foreach (@{$Files{'doc'}}) { print STDOUT " $_ => "; ($file = $_) =~ s%.*/%%o; $destfile = join('', $OptValues{'docpath'}, $DIRSEP, $file); print STDOUT $destfile, "\n"; - cp($_, $destfile); + cp($_, apply_root($Root, $destfile)); } } if ($doman) { my($sect, $msubdir); print STDOUT qq(Installing manpages to "$OptValues{'manpath'}":\n); - if (create_dir($OptValues{'manpath'}, 1) <= 0) { die "\n"; } + if (create_dir(apply_root($Root, $OptValues{'manpath'}), 1) <= 0) { + die "\n"; + } foreach (@{$Files{'man'}}) { print STDOUT " $_ => "; ($file = $_) =~ s%.*/%%o; ($sect = $file) =~ s%.*\.%%o; $msubdir = join($DIRSEP, $OptValues{'manpath'}, "man$sect"); - if (create_dir($msubdir, 1) <= 0) { die "\n"; } + if (create_dir(apply_root($Root, $msubdir), 1) <= 0) { die "\n"; } $destfile = join($DIRSEP, $msubdir, $file); print STDOUT $destfile, "\n"; - cp($_, $destfile); + cp($_, apply_root($Root, $destfile)); } } } @@ -547,6 +560,18 @@ sub get_perl_from_user { $value; } +##------------------------------------------------------------------------ +## apply_root() applies install base root path to given path. +## +sub apply_root { + my $base = shift; + my $path = shift; + if ($base) { + return $base . $path; + } + $path; +} + ##------------------------------------------------------------------------ ## get_path_from_user() gets a path from the user. The function ## insures the path exists. @@ -558,12 +583,12 @@ sub get_path_from_user { if (defined($value) && ($value =~ /\S/)) { die qq(ERROR: Unable to create "$value".\n) - unless create_dir($value, 1) > 0; + unless create_dir(apply_root($Root, $value), 1) > 0; } else { my $stat; while (1) { $value = interpolate_path(prompt_user($prompt, $default)); - $stat = create_dir($value); + $stat = create_dir(apply_root($Root, $value)); if ($stat > 0) { last; } if ($stat == 0) { next; } } diff --git a/lib/mhamain.pl b/lib/mhamain.pl index e0d80d4..3fd5c02 100644 --- a/lib/mhamain.pl +++ b/lib/mhamain.pl @@ -1,6 +1,6 @@ ##---------------------------------------------------------------------------## ## File: -## $Id: mhamain.pl,v 2.66 2003/06/20 18:28:59 ehood Exp $ +## $Id: mhamain.pl,v 2.67 2003/07/20 03:25:18 ehood Exp $ ## Author: ## Earl Hood mhonarc@mhonarc.org ## Description: @@ -29,7 +29,7 @@ package mhonarc; require 5; -$VERSION = '2.6.4'; +$VERSION = '2.6.5'; $VINFO =< [ 'cp878' ], 'gost-19768-87' => [ 'ecma-cyrillic', 'ecma-113', 'ecma-113:1988' ], - 'big5-eten ' => [ 'big5', 'csbig5', + 'big5-eten' => [ 'big5', 'csbig5', 'tcs-big5', 'tcsbig5' ], 'big5-hkscs' => [ 'big5hkscs', 'big5hk', 'hkscs-big5', 'hk-big5' ], diff --git a/lib/mhtxthtml.pl b/lib/mhtxthtml.pl index bc4c9b4..c300e64 100644 --- a/lib/mhtxthtml.pl +++ b/lib/mhtxthtml.pl @@ -1,6 +1,6 @@ ##---------------------------------------------------------------------------## ## File: -## $Id: mhtxthtml.pl,v 2.32 2003/04/05 23:52:20 ehood Exp $ +## $Id: mhtxthtml.pl,v 2.33 2003/07/15 20:12:16 ehood Exp $ ## Author: ## Earl Hood mhonarc@mhonarc.org ## Description: @@ -137,6 +137,7 @@ sub filter { my $onlycid = $args !~ /\ballownoncidurls\b/i; my $subdir = $args =~ /\bsubdir\b/i; my $norelate = $args =~ /\bdisablerelated\b/i; + my $allowcom = $args =~ /\ballowcomments\b/i; my $atdir = $subdir ? $mhonarc::MsgPrefix.$mhonarc::MHAmsgnum : ""; my $tmp; @@ -343,8 +344,10 @@ sub filter { ## Check comment declarations: may screw-up mhonarc processing ## and avoids someone sneaking in SSIs. - #$$data =~ s///go; # can crash perl - $$data =~ s/