emacs/emacs.el: activation et configuration d'uniquify

[dotfiles.git] / emacs / emacs.el

diff --git a/emacs/emacs.el b/emacs/emacs.el
index f5fdb27..b5e7575 100644 (file)
--- a/emacs/emacs.el
+++ b/emacs/emacs.el
@@ -30,28 +30,25 @@
 
 ;; Mozmail is available in XEmacs CVS :
 ;; http://cvs.xemacs.org/viewcvs.cgi/XEmacs/packages/xemacs-packages/net-utils/mozmail.el
-(require 'mozmail)
-(require 'tt25-passwords)
+(load "mozmail" t)
+(load "tt25-passwords" t)
 ;; (require 'tt25-muse)
-(require 'tt25-erc)
+(load "tt25-erc" t)
 (require 'color-theme)
 (require 'ido)
+(require 'uniquify)
+(require 'themes)
 
-;; Pour Wikipedia
-(require 'wikipedia-mode)
-(autoload 'longlines-mode "longlines.el"
-     "Minor mode for editing long lines." t)
-(add-to-list 'auto-mode-alist '("mozex.\\.*" . wikipedia-mode))
 
 ;; ,----
 ;; | Couleurs et apparence
 ;; `----
 
-(if window-system
-    (color-theme-resolve)
-  (color-theme-dark-laptop))
+;(if window-system)
+    (color-theme-tango)
+;;  (color-theme-dark-laptop))
 
-(set-face-background 'default "black")
+;old: (set-face-background 'default "black")
 
 (if window-system
     (progn 
@@ -59,6 +56,10 @@
       (tooltip-mode nil)
       (scroll-bar-mode t)))
 
+;; font
+(if (>= emacs-major-version 23)
+  (set-frame-font "DejaVu Sans Mono-10"))
+
 ;; ,----
 ;; | Comportement
 ;; `----
@@ -74,6 +75,12 @@
 (display-time)                         ; On affiche l'heure dans la barre
 (setq visible-bell t)                  ; On desactive les beeps
 
+;; Configuration d'uniquify
+(setq uniquify-buffer-name-style 'reverse)
+(setq uniquify-separator "|")
+(setq uniquify-after-kill-buffer-p t)
+(setq uniquify-ignore-buffers-re "^\\*")
+
 ;; Quand vous recevez un fichier .txt d'une machine dos/windows il est
 ;; très énervant de voir les ^M a chaque fin de ligne, utiliser M-x
 ;; dos-unix pour vous en débarrasser. (J. Danjou)