;; Put Rmail files in Mail directory.
(setq rmail-file-name "~/Mail/RMAIL"
      mail-archive-file-name "~/Mail/SMAIL")

;; Break long lines in text mode.
(setq text-mode-hook 'turn-on-auto-fill)

;; Exchange bindings for "RETURN" and "LINEFEED" to support indentation.
(define-key global-map "\C-j" 'newline)
(define-key global-map "\C-m" 'newline-and-indent)

;; Add a missing newline at the end of file without asking.
(setq require-final-newline t)

;; A more informative mode line is obained by removing the semicolons
;; in the next two lines
;;   (setq mode-line-format "%[%b%*%* %M %[(%m)%] %3p%] %f")
;;   (setq default-mode-line-format mode-line-format)

;; Add some "file name suffix - mode command" pairs
(setq auto-mode-alist (append '(
                ("\\.s$" . indented-swe-mode)
                ("\\.mms$" . swe-mode)
                ("\\.mm$" . text-mode)
                ("\\.def$" . m2-definition-mode)
                ("\\.mod$" . m2-implementation-mode))
                auto-mode-alist))

;; Break long lines in text mode.
(setq text-mode-hook 'turn-on-auto-fill)

(load "ange-ftp")
(autoload 'lyskom "lyskom" "LysKOM" t)

(setq kom-mercial "Hmmmm...")




