diff options
Diffstat (limited to 'solenv/bin/fix_shl.cmd')
-rw-r--r-- | solenv/bin/fix_shl.cmd | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/solenv/bin/fix_shl.cmd b/solenv/bin/fix_shl.cmd new file mode 100644 index 000000000000..ca13abb2074e --- /dev/null +++ b/solenv/bin/fix_shl.cmd @@ -0,0 +1,11 @@ +/* os2 build scripts
+
+will return a 8.3 conformant name for modname.
+
+21/02/2006 Actually this is a simple truncation, seems nothing more needed.
+
+*/
+
+parse arg modname
+if pos('.',modname)>0 then modname = left(modname, pos('.',modname)-1)
+say strip(left(modname,8))
|