Subversion Repositories wimsdev

Rev

Rev 15324 | Rev 15370 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15324 Rev 15368
Line 321... Line 321...
321 
    ptest=$pass
 321 
    ptest=$pass
322 
    !goto existing
 322 
    !goto existing
323 
  !endif
 323 
  !endif
324 
  !for i in lastn,firstn
 324 
  !for i in lastn,firstn
325 
    $i=!replace , by , in $($i)
 325 
    $i=!replace , by , in $($i)
326 
    $i=!translate internal !$$<" to $    $ in $($i)
 326 
    $i=!translate internal ! $$<" to $     $ in $($i)
327 
    $i=!trim $($i)
 327 
    $i=!trim $($i)
328 
    $i=!singlespace $($i)
 328 
    $i=!singlespace $($i)
329 
    $i=!char 1 to 40 of $($i)
 329 
    $i=!char 1 to 40 of $($i)
330 
  !next i
 330 
  !next i
331 
  !if $lastn=$empty or $firstn=$empty
 331 
  !if $lastn=$empty or $firstn=$empty