(defvar running-xemacs (string-match "XEmacs\\|Lucid" emacs-version))

(global-set-key [delete] 'delete-char)
(global-set-key [kp-delete] 'delete-char)

(cond ((not running-xemacs)
    (global-font-lock-mode t)
))

(setq require-final-newline t)
(setq next-line-add-newlines nil)

(if (not running-xemacs)
    (require 'mwheel)
    (mwheel-install)
)

(setq inhibit-startup-message t)

(setq load-path (append load-path '("/usr/share/xemacs-21.1.14/lisp")))
;; (require 'auto-save)
;; (setq auto-save-directory (expand-file-name "~/.emacs-save/")
;;         auto-save-directory-fallback auto-save-directory
;;         auto-save-hash-p nil
;;         auto-save-interval 2000)

(setq delete-auto-save-files t)
(setq make-backup-files nil)

(auto-save-mode 0)
(show-paren-mode)

(setq load-path (cons (expand-file-name "~/.emacs-lisp/") load-path))
(autoload 'typing-of-emacs "typing" "The Typing Of Emacs, a game." t)