home *** CD-ROM | disk | FTP | other *** search
- #---------------------------------------------------------------------------
- #
- # (c) Cadre Technologies Inc. 1996
- #
- # File: @(#)illegalcha.tcl /main/titanic/1
- # Author: anonymous
- # Description: Mapping from ItemTypes to the sets of characters that
- # can not be used in names of Items having these types.
- #---------------------------------------------------------------------------
- # SccsId = @(#)illegalcha.tcl /main/titanic/1 10 Oct 1997 Copyright 1996 Cadre Technologies Inc.
-
- global illegalCharacters
-
- set illegalCharacters(cl) {[/$:=,(){}]}
- set illegalCharacters(de) {[]/$*:=,(){}[]}
- set illegalCharacters(pe) {[]/$:=,(){}[]}
- set illegalCharacters(ce) {[/:,]}
- set illegalCharacters(et) {[/:,]}
- set illegalCharacters(st) {[/,]}
- set illegalCharacters(rs) {}
- set illegalCharacters(doc) {}
- set illegalCharacters(section) {,}
- set illegalCharacters(name) {}
-