I found the fault...
Seems I made a small mistake, and my ctwm was the default system ctwm
of 3.5.2 NOT 3.7b5 Aaaarrggghhhhhh.....
Not only that but the real one has the setting TWM_VERSION = "3.8devel"
and I know I downloaded 3.7beta5 this morning...
Add a 'd' to the first translit() in my CTWM_VERSION m4 code and all is well.
=======8<--------CUT HERE----------axes/crowbars permitted---------------
#
# Anthony Thyssens ".twmrc.m4" for multiple ctwm versions
#
changecom()dnl # Do not remove comments from the result
changequote([,])dnl # m4 quoting interferes with shell escapes
dnl
dnl Testing this file...
dnl rm /tmp/twmrc*; ctwm -k -f .twmrc.m4 -w
dnl cat /tmp/twmrc* .twmrc.m4 | m4 | less
dnl
dnl Capitalised version of the window managers name, for use in Menus
define( TWM_NAME, translit(TWM_TYPE, [cvt], [CVT]))dnl
# [TWM_TYPE] => "TWM_TYPE"
# [TWM_NAME] => "TWM_NAME"
dnl
dnl Convert version number to a 3 digit number, from versions such as...
dnl 3.5, 3.5.2, 3.6 or 3.7-alpha5 3.7beta4
dnl for use in ctwm version specific additions. For example:
dnl ifelse( eval( CTWM_VERSION >= 352 ), 1, [....], [.....])
dnl This is not easy, so I use multiple steps to achieve the goal.
ifelse( TWM_TYPE, ctwm, [dnl
define(TMP_A, translit(TWM_VERSION, [abd-], [~~~~]))dnl
define(TMP_B, substr(TMP_A, 0, index(TMP_A[~], [~])))dnl
define(TMP_C, translit(TMP_B, [.]))dnl
define(TMP_D, substr(TMP_C[000], 0, 3))dnl
define(CTWM_VERSION, TMP_D)dnl
undefine(TMP_A)undefine(TMP_B)undefine(TMP_C)undefine(TMP_D)dnl
],[define(CTWM_VERSION, 0)])dnl
# [TWM_VERSION] => "TWM_VERSION"
# [CTWM_VERSION] => "CTWM_VERSION"
#
=======8<--------CUT HERE----------axes/crowbars permitted---------------
Anthony Thyssen ( System Programmer ) <[EMAIL PROTECTED]>
-----------------------------------------------------------------------------
There it is; dwarves are not heros, but a calculating folk with
a great idea of the value of money; -- JRR Tolkein, ``The Hobbit''
-----------------------------------------------------------------------------
Anthony's Home is his Castle http://www.cit.gu.edu.au/~anthony/
