Farbflash projects: Imaging lingo table | 3-D scene list | Find all | Handler menu | Lingo message window

Changeset 230 for trunk


Ignore:
Timestamp:
03/21/09 11:50:29 (3 years ago)
Author:
alex
Message:

moved stripfunnychars handler to alex:utilities

Location:
trunk/lingosource/castlib1
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/lingosource/castlib1/alexUtilities.ls

    r228 r230  
    35303530end 
    35313531 
     3532 
     3533-- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
     3534 
     3535on mStripFunnyCharsFromFileName me, theFileName 
     3536   
     3537  offs = offset(" ", theFileName) 
     3538  repeat while offs > 0 
     3539    put "_" into char offs of theFileName 
     3540    offs = offset(" ", theFileName) 
     3541  end repeat 
     3542   
     3543  offs = offset("/", theFileName) 
     3544  repeat while offs > 0 
     3545    put "_" into char offs of theFileName 
     3546    offs = offset("/", theFileName) 
     3547  end repeat 
     3548   
     3549  offs = offset(":", theFileName) 
     3550  repeat while offs > 0 
     3551    put "_" into char offs of theFileName 
     3552    offs = offset(":", theFileName) 
     3553  end repeat 
     3554   
     3555  offs = offset("\", theFileName) 
     3556  repeat while offs > 0 
     3557    put "_" into char offs of theFileName 
     3558    offs = offset("\", theFileName) 
     3559  end repeat 
     3560   
     3561  offs = offset("&", theFileName) 
     3562  repeat while offs > 0 
     3563    put "_" into char offs of theFileName 
     3564    offs = offset("&", theFileName) 
     3565  end repeat 
     3566   
     3567  return theFileName 
     3568   
     3569end 
     3570 
  • trunk/lingosource/castlib1/subversion_version_field.txt

    r228 r230  
    1 r230 
     1r231 
  • trunk/lingosource/castlib1/svn_Utilities.ls

    r228 r230  
    978978  if doit = 1 then mSaveList_2_XML me, newInfolist, infolistPath 
    979979   
    980    
    981 end 
    982  
    983 -- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
    984  
    985 on mStripFunnyCharsFromFileName me, theFileName 
    986    
    987   offs = offset(" ", theFileName) 
    988   repeat while offs > 0 
    989     put "_" into char offs of theFileName 
    990     offs = offset(" ", theFileName) 
    991   end repeat 
    992    
    993   offs = offset("/", theFileName) 
    994   repeat while offs > 0 
    995     put "_" into char offs of theFileName 
    996     offs = offset("/", theFileName) 
    997   end repeat 
    998    
    999   offs = offset(":", theFileName) 
    1000   repeat while offs > 0 
    1001     put "_" into char offs of theFileName 
    1002     offs = offset(":", theFileName) 
    1003   end repeat 
    1004    
    1005   offs = offset("\", theFileName) 
    1006   repeat while offs > 0 
    1007     put "_" into char offs of theFileName 
    1008     offs = offset("\", theFileName) 
    1009   end repeat 
    1010    
    1011   offs = offset("&", theFileName) 
    1012   repeat while offs > 0 
    1013     put "_" into char offs of theFileName 
    1014     offs = offset("&", theFileName) 
    1015   end repeat 
    1016    
    1017   return theFileName 
    1018980   
    1019981end 
Note: See TracChangeset for help on using the changeset viewer.