Changed load-dir to d-dir, autopair, no comments

* Changed the load-dir variable in .emacs to d-dir (from emacs._d_).
    Using the same variable as emacs didn't seem like a good idea to me.

  * Moved autopair settings from 10-modules and 10-settings to
    20-autopair

  * Removed the folding-mode comments from load files.
This commit is contained in:
Tom Willemsen 2011-04-15 09:48:38 +02:00
parent f2a0e6c811
commit 9420f67c17
5 changed files with 8 additions and 21 deletions

10
emacs
View file

@ -1,11 +1,11 @@
;; -*- mode: Emacs-Lisp; -*-
(setq load-dir "~/.emacs.d/")
(setq elisp-dir (concat load-dir "elisp/"))
(setq d-dir "~/.emacs.d/")
(setq elisp-dir (concat d-dir "elisp/"))
(setq my-files (directory-files d-dir nil "^[0-9]\\{2\\}-\.*el$"))
(setq my-elisp-files
(directory-files elisp-dir nil "\\.el$"))
(setq my-files (directory-files load-dir nil "^[0-9]\\{2\\}-\.*el$"))
;; Compile 3rd party elisp files
(byte-recompile-directory elisp-dir)
@ -16,9 +16,9 @@
(setq my-elisp-files (cdr my-elisp-files))))
;; Compile my elisp files
(byte-recompile-directory load-dir)
(byte-recompile-directory d-dir)
(while my-files
(let ((my-file-name (concat load-dir (car my-files))))
(let ((my-file-name (concat d-dir (car my-files))))
(if (not (file-exists-p (concat my-file-name "c")))
(byte-compile-file my-file-name))
(load (substring my-file-name 0 (- (length my-file-name) 3)))

View file

@ -1,8 +1,5 @@
;;{{{ Requires
(require 'naquadah-theme)
(require 'autopair)
;;}}}
;;{{{ Auto loads
(autoload 'vala-mode "vala-mode"
"A Major mode for editing Vala files" t)
(autoload 'csharp-mode "csharp-mode"
@ -19,4 +16,3 @@
"A Major mode for editing PHP files" t)
(autoload 'graphviz-dot-mode "graphviz-dot-mode"
"A Major mode for editing graphviz dot files" t)
;;}}}

View file

@ -24,7 +24,6 @@
(global-font-lock-mode t) ; show syntax highlighting, old
(show-paren-mode t) ; show matching parens
(delete-selection-mode t) ; delete selection upon typing
(autopair-global-mode)
;; Byte-compile elisp files on save
(add-hook 'before-save-hook 'delete-trailing-whitespace)

2
emacs.d/20-autopair.el Normal file
View file

@ -0,0 +1,2 @@
(require 'autopair)
(autopair-global-mode)

View file

@ -1,19 +1,9 @@
;;{{{ Load
(require 'column-marker)
;;}}}
;;{{{ Functions
(defun set-column-marker ()
(column-marker-1 73)
(column-marker-2 81))
;;}}}
;;{{{ Hooks
(add-hook 'c-mode-hook 'set-column-marker)
(add-hook 'emacs-lisp-mode-hook 'set-column-marker)
(add-hook 'html-mode-hook 'set-column-marker)
;;}}}