Update of /cvsroot/mhonarc/mharc/bin
In directory subversions:/tmp/cvs-serv22938
Modified Files:
apply-config
Log Message:
Fixed handling of case when no directories are supplied. Cases
where HTML_DIR, or other directories, are different from the default
are now handled.
(Thanks to Eugene Eric Kim for spotting this.)
Index: apply-config
===================================================================
RCS file: /cvsroot/mhonarc/mharc/bin/apply-config,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** apply-config 15 Sep 2002 03:33:08 -0000 1.10
--- apply-config 28 Sep 2002 05:01:07 -0000 1.11
***************
*** 143,148 ****
if (!(_at_)ARGV) {
! @ARGV = ("$Dir/..");
}
find({ wanted => \&wanted,
},
--- 143,162 ----
if (!(_at_)ARGV) {
! my $home = $config->{'SW_ROOT'};
! push(@ARGV, $home);
! my($dir);
! foreach $dir ($config->{'HTML_DIR'},
! $config->{'CGI_DIR'},
! $config->{'MBOX_DIR'},
! $config->{'INFO_DIR'},
! $config->{'MKNMZ_TMPL_DIR'}) {
!
! $dir =~ s/\/+$//;
! if ($dir !~ /^\Q$home\E\//o) {
! push(@ARGV, $dir);
! }
! }
}
+
find({ wanted => \&wanted,
},
---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-DEV