From 10e51cce978a420e7df49c8aa02b01d0915fcb6b Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Wed, 24 Nov 2004 00:00:00 +0100
Subject: stable 2004.11.24

---
 scripts/context/perl/texexec.pl    | 1 +
 scripts/context/ruby/texmfstart.rb | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

(limited to 'scripts')

diff --git a/scripts/context/perl/texexec.pl b/scripts/context/perl/texexec.pl
index aa62954ca..daf640bbf 100644
--- a/scripts/context/perl/texexec.pl
+++ b/scripts/context/perl/texexec.pl
@@ -33,6 +33,7 @@ eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}' && eval 'exec perl -w -
 #D everything. Well, the result is a messy script like this ... Sorry.
 
 use strict ;
+
 #~ use warnings ; # strange warnings, todo
 
 # todo: second run of checksum of mp file with --nomprun changes
diff --git a/scripts/context/ruby/texmfstart.rb b/scripts/context/ruby/texmfstart.rb
index 47e8ff25d..bdf2aa212 100644
--- a/scripts/context/ruby/texmfstart.rb
+++ b/scripts/context/ruby/texmfstart.rb
@@ -34,7 +34,7 @@ if $mswindows then
     GetLongPathName  = Win32API.new('kernel32', 'GetLongPathName',  ['P','P','N'], 'N')
 
     def dowith_pathname (filename,filemethod)
-        filename.gsub!(/\\/o,'/')
+        filename = filename.gsub(/\\/o,'/') # no gsub! because filename can be frozen
         case filename
             when /\;/o then
                 # could be a path spec
-- 
cgit v1.2.3