im_reduce_spaces

one of the documented procedures in this installation of the ACS
Usage:
im_reduce_spaces   string
What it does:
Replaces all consecutive spaces with one
Defined in: /web/philip/tcl/intranet-defs.tcl

Source code:


    regsub -all {[ ]+} $string " " string
    return $string


philg@mit.edu