(local-set-key [?*] 'mdw-rexx-electric-*)
(mapcar #'(lambda (ch) (modify-syntax-entry ch "w"))
'(?! ?? ?# ?@ ?$))
+ (mapcar #'(lambda (ch) (modify-syntax-entry ch "."))
+ '(?¬))
(mdw-standard-fill-prefix "\\([ \t]*/?\*[ \t]*\\)")
;; Set up keywords and things for fontification.