(setq inhibit-startup-message t) 
(setq initial-scratch-message ";;;   S C R A T C H   B U F F E R   ;;;
")

(if window-system
   (progn
      (menu-bar-mode 1)
      (tool-bar-mode 0))
   (menu-bar-mode 0))

(setq inhibit-startup-message t) 
(setq initial-scratch-message ";;;   S C R A T C H   B U F F E R   ;;;
")

(if window-system
    (progn
        (global-set-key [kp-delete] 'delete-char)
        (global-set-key [M-kp-delete] 'kill-word)
        (menu-bar-mode 1)
        (tool-bar-mode 0))
   (menu-bar-mode 0))


Fix delete in windowed mode
Fix delete in windowed mode

cdlm/infrastructure,cdlm/infrastructure,cdlm/infrastructure,cdlm/infrastructure