projects
/
elisp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8b4703d
)
Update.
author
Francois Fleuret
<francois@fleuret.org>
Fri, 27 Jun 2014 12:39:11 +0000
(14:39 +0200)
committer
Francois Fleuret
<francois@fleuret.org>
Fri, 27 Jun 2014 12:39:11 +0000
(14:39 +0200)
emacs.el
patch
|
blob
|
history
diff --git
a/emacs.el
b/emacs.el
index
a4a0304
..
d594243
100644
(file)
--- a/
emacs.el
+++ b/
emacs.el
@@
-31,6
+31,9
@@
;; Xft.antialias: true
;; Xft.rgba: rgb
;; Xft.antialias: true
;; Xft.rgba: rgb
+;; This is where I put most of my emacs-related files
+(setq ff/emacs-dir "~/private/emacs")
+
;; Give the focus to the emacs window if we are under a windowing
;; system
;; Give the focus to the emacs window if we are under a windowing
;; system
@@
-73,8
+76,11
@@
;; Activate the dynamic completion of buffer names
(iswitchb-mode 1)
;; Activate the dynamic completion of buffer names
(iswitchb-mode 1)
+(unless (file-exists-p ff/emacs-dir)
+ (mkdir ff/emacs-dir))
+
;; Save the minibuffer history
;; Save the minibuffer history
-(setq savehist-file
"~/private/emacs/savehist"
)
+(setq savehist-file
(concat ff/emacs-dir "/savehist")
)
(when (functionp 'savehist-mode) (savehist-mode 1))
;; And allow minibuffer recursion
(when (functionp 'savehist-mode) (savehist-mode 1))
;; And allow minibuffer recursion
@@
-2275,7
+2281,7
@@
next one. With universal argument, kill all killable buffers."
"\.bbl$" "\.aux$" "\.toc$"
))
recentf-max-saved-items 1000
"\.bbl$" "\.aux$" "\.toc$"
))
recentf-max-saved-items 1000
- recentf-save-file
"~/private/emacs/recentf"
+ recentf-save-file
(concat ff/emacs-dir "/recentf")
)
(when (boundp 'recentf-keep) (add-to-list 'recentf-keep 'file-remote-p))
)
(when (boundp 'recentf-keep) (add-to-list 'recentf-keep 'file-remote-p))
@@
-2311,7
+2317,7
@@
next one. With universal argument, kill all killable buffers."
media/add-current-song-to-interrupted-when-killing t
media/duration-to-history 30
media/history-size 1000
media/add-current-song-to-interrupted-when-killing t
media/duration-to-history 30
media/history-size 1000
- media/playlist-file
"~/private/emacs/media-playlists"
+ media/playlist-file
(concat ff/emacs-dir "/media-playlists")
media/mplayer/args '(
"-framedrop"
"-zoom"
media/mplayer/args '(
"-framedrop"
"-zoom"
@@
-2731,9
+2737,9
@@
With argument ARG, do this that many times."
;; Where to save the bookmarks and where is bbdb
;; Where to save the bookmarks and where is bbdb
-(setq bookmark-default-file
"~/private/emacs/bmk"
+(setq bookmark-default-file
(concat ff/emacs-dir "/bmk")
bbdb-file "~/private/bbdb"
bbdb-file "~/private/bbdb"
- custom-file
"~/private/emacs/custom"
)
+ custom-file
(concat ff/emacs-dir "/custom")
)
;; enotes.el is one of my own scripts, check my web page
;; enotes.el is one of my own scripts, check my web page