+;;; .emacs -- My emacs configuration
 ;;; Changes to your init.el file will not take effect until the next
 ;;; time you start up XEmacs, unless you load it explicitly with
 ;;;
 ;;;   M-x load-file RET ~/.xemacs/init.el RET
+;;;
+;;; Commentary:
+;;; Borrowed liberally from other places.  A collection of
+;;; configuration options and shortcuts.
+
+;;; Code:
 
 ;;; Automatically turn on auto fill mode for text mode buffers
 (add-hook 'text-mode-hook 'text-mode-hook-identify)


;;; From Aaron Sawdey to prevent accidental closing
(defun ask-before-closing ()
  "Ask whether or not to close, and then close if y was pressed"
  (interactive)
  (if (y-or-n-p (format "Are you sure you want to exit Emacs? "))
      (if (< emacs-major-version 21)

  (insert "-------------------------------------------------------\n"))

(defun double-entry (var)
  "If passed VAR=x, return (x,x)."
  (list var var))

(defun read-lines (file)
