Changeset 230 for trunk/lingosource/castlib1/svn_Utilities.ls

Timestamp:

03/21/09 11:50:29 (3 years ago)

Author:

alex

Message:

moved stripfunnychars handler to alex:utilities

File:

• trunk/lingosource/castlib1/svn_Utilities.ls (modified) (1 diff)

trunk/lingosource/castlib1/svn_Utilities.ls

@@ -978 +978 @@
   if doit = 1 then mSaveList_2_XML me, newInfolist, infolistPath
   
-  
-end
-
--- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
-
-on mStripFunnyCharsFromFileName me, theFileName
-  
-  offs = offset(" ", theFileName)
-  repeat while offs > 0
-    put "_" into char offs of theFileName
-    offs = offset(" ", theFileName)
-  end repeat
-  
-  offs = offset("/", theFileName)
-  repeat while offs > 0
-    put "_" into char offs of theFileName
-    offs = offset("/", theFileName)
-  end repeat
-  
-  offs = offset(":", theFileName)
-  repeat while offs > 0
-    put "_" into char offs of theFileName
-    offs = offset(":", theFileName)
-  end repeat
-  
-  offs = offset("\", theFileName)
-  repeat while offs > 0
-    put "_" into char offs of theFileName
-    offs = offset("\", theFileName)
-  end repeat
-  
-  offs = offset("&", theFileName)
-  repeat while offs > 0
-    put "_" into char offs of theFileName
-    offs = offset("&", theFileName)
-  end repeat
-  
-  return theFileName
   
 end