bloggo ergo sum » elisp http://bloggoergosum.com Sun, 14 Mar 2010 21:13:00 +0000 en hourly 1 http://wordpress.org/?v=3.0.1 First Things in my .emacs http://bloggoergosum.com/2006/07/02/first-things-in-my-emacs/ http://bloggoergosum.com/2006/07/02/first-things-in-my-emacs/#comments Mon, 03 Jul 2006 04:21:11 +0000 Ben http://bloggoergosum.us/2006/07/02/first-things-in-my-emacs/ Continue reading →]]> Pardon the extra linebreaks. I don’t normally format my lisp code this way, but the layout of my blog makes this snippet linewrap and hard to read.

(global-font-lock-mode t)
 
(defvar autosave-dir "~/.emacs.d/autosave")
(make-directory autosave-dir t)
 
(defun auto-save-file-name-p (filename)
  (string-match "^#.*#$" 
                     (file-name-nondirectory filename)))
 
(defun make-auto-save-file-name ()
  (concat autosave-dir
          (if buffer-file-name
              (concat "#" 
                         (file-name-nondirectory buffer-file-name) 
                         "#")
            (expand-file-name (concat "#%" 
                                                 (buffer-name) 
                                                 "#")))))
 
(defvar backup-dir "~/.emacs.d/backup")
(make-directory backup-dir t)
(setq backup-directory-alist (list (cons "." backup-dir)))
]]> http://bloggoergosum.com/2006/07/02/first-things-in-my-emacs/feed/ 0