Hi,
I'm not on the list and can't followup properly ("In-Reply-To:" because
no message IDs are displayed in the web archive.
Werner wrote:
> At least with my perl 5.005_03, $HOME isn't defined within the script
> (but is set in my environment).
Perl has a different syntax. This patch should work:
--snip--
--- /opt/proj/WDM/tools/bin/fvwm24_convert Tue Jul 10 11:08:39 2001
+++ ./fvwm24_convert Tue Jul 10 11:59:12 2001
@@ -12,7 +12,7 @@
($source,$dest) = @ARGV;
$dest2 = "$dest.pass1";
if ( $source eq "") {
- $source = "$$HOME/.fvwm2rc";
+ $source = "$ENV{'HOME'}/.fvwm2rc";
}
if ( ! -e $source ) {
die "Can't find source file $source, giving up.\n";
--snip--
Furthermore, I get this error:
--snip--
[EMAIL PROTECTED]:/tmp > truss -f -o ./perl.trace perl ./fvwm24_convert
Input from /home/eedmoba/.fvwm2rc, output to /.fvwm/.fvwm2rc
Can't redirect stdout to .pass1 at ./fvwm24_convert line 65.
--snip--
Well, I really don't know why it can't do so, but part of the problem
is in the first message: I will not be able to create the output file
in the root directory. ;-) This is because the script uses this
argument parsing:
($source,$dest) = @ARGV;
makeing $dest empty if you don't pass the script two arguments.
If you do pass two args, things go well.
So there should be an
$ARGV = 2 || die "$ARGV[0] requires two arguments";
in there, or something, because the defaults don't work out of the
box..
Thanks for listening,
now I'll finally try all those nifty new features (on Solaris),
Moritz
--
Visit the official FVWM web page at <URL:http://www.fvwm.org/>.
To unsubscribe from the list, send "unsubscribe fvwm-workers" in the
body of a message to [EMAIL PROTECTED]
To report problems, send mail to [EMAIL PROTECTED]
