update dev300-m58
[ooovba.git] / solenv / bin / fix_shl.cmd
blobca13abb2074edfee54313784fbeb515ba447a7d1
1 /* os2 build scripts
3 will return a 8.3 conformant name for modname.
5 21/02/2006 Actually this is a simple truncation, seems nothing more needed.
7 */
9 parse arg modname
10 if pos('.',modname)>0 then modname = left(modname, pos('.',modname)-1)
11 say strip(left(modname,8))