             (normal-top-level-add-subdirs-to-load-path)))
          load-path)))
 
+
 ;;;; Emacs window (frame)
 (setq frame-title-format (concat "%b@" system-name))  ;%b = buffer name
+
 
 ;;;; Default font
 ;;; Setting the font here is problematic because it triggers a window

          ;; Rick prefers a larger font.
          (set-face-attribute 'default nil :font "Consolas-13"))
      (set-face-attribute 'default nil :font "Consolas-11")))

;;;; Desktop
;;; See http://www.emacswiki.org/emacs/DeskTop

  (add-to-list 'desktop-buffer-mode-handlers '(w3m-mode . w3m-restore-desktop-buffer)))


;;;; Opening files and buffer manipulation
(defun close-current-buffer ()
  "Close the current buffer.

