adjust
[emacs.git] / .emacs.d / config / emacs.org
index 0d802ab..4c12f31 100644 (file)
@@ -2070,22 +2070,22 @@ Emacs]].
 
 I want to access it from anywhere using =F6=.
 #+BEGIN_SRC emacs-lisp
-  (autoload 'mingus "mingus-stays-home" nil t)
-  (global-set-key (kbd "<f6>") 'mingus)
-  (setq mingus-dired-add-keys t)
-  (setq mingus-mode-always-modeline nil)
-  (setq mingus-mode-line-show-elapsed-percentage nil)
-  (setq mingus-mode-line-show-volume nil)
-  (setq mingus-mpd-config-file "/etc/mpd.conf")
-  (setq mingus-mpd-playlist-dir "/var/lib/mpd/playlists")
-  (setq mingus-mpd-root "/share/music/")
+(autoload 'mingus "mingus-stays-home" nil t)
+(global-set-key (kbd "<f6>") 'mingus)
+(setq mingus-dired-add-keys t)
+(setq mingus-mode-always-modeline nil)
+(setq mingus-mode-line-show-elapsed-percentage nil)
+(setq mingus-mode-line-show-volume nil)
+(setq mingus-mpd-config-file "/etc/mpd.conf")
+(setq mingus-mpd-playlist-dir "/var/lib/mpd/playlists")
+(setq mingus-mpd-root "/share/music/")
 #+END_SRC
 
 ** saveplace
 Store at which point I have been in files.
 #+BEGIN_SRC emacs-lisp
-(require 'saveplace)
 (setq-default save-place t)
+(require 'saveplace)
 (setq save-place-file (expand-file-name "saved-places" jj-cache-dir))
 #+END_SRC
 ** savehist
@@ -2094,18 +2094,15 @@ Save a bit of history
 #+BEGIN_SRC emacs-lisp
 (require 'savehist)
 (setq savehist-additional-variables
-      ;; search entries
-      '(search ring regexp-search-ring)
-      ;; save every minute
-      savehist-autosave-interval 60
-      ;; keep the home clean
-      savehist-file (expand-file-name "savehist" jj-cache-dir))
+ '(search ring regexp-search-ring kill-ring compile-history))
+ ;; save every minute
+(setq savehist-autosave-interval 60)
+(setq savehist-file (expand-file-name "savehist" jj-cache-dir))
 (savehist-mode +1)
 #+END_SRC
 
 ** easypg
 EasyPG is a GnuPG interface for Emacs.
-
 #+BEGIN_SRC emacs-lisp
 (require 'epa-file)
 (epa-file-enable)
@@ -2113,23 +2110,22 @@ EasyPG is a GnuPG interface for Emacs.
 
 I took the following from [[http://www.emacswiki.org/emacs/EasyPG][EmacsWiki: Easy PG]]
 #+BEGIN_SRC emacs-lisp
-  (defadvice epg--start (around advice-epg-disable-agent disable)
-    "Don't allow epg--start to use gpg-agent in plain text
-      terminals."
-    (if (display-graphic-p)
-        ad-do-it
-      (let ((agent (getenv "GPG_AGENT_INFO")))
-        (setenv "GPG_AGENT_INFO" nil) ; give us a usable text password prompt
-        ad-do-it
-        (setenv "GPG_AGENT_INFO" agent))))
-  (ad-enable-advice 'epg--start 'around 'advice-epg-disable-agent)
-  (ad-activate 'epg--start)
+(defadvice epg--start (around advice-epg-disable-agent disable)
+  "Don't allow epg--start to use gpg-agent in plain text
+    terminals."
+  (if (display-graphic-p)
+      ad-do-it
+    (let ((agent (getenv "GPG_AGENT_INFO")))
+      (setenv "GPG_AGENT_INFO" nil) ; give us a usable text password prompt
+      ad-do-it
+      (setenv "GPG_AGENT_INFO" agent))))
+(ad-enable-advice 'epg--start 'around 'advice-epg-disable-agent)
+(ad-activate 'epg--start)
 #+END_SRC
 ** message
 #+BEGIN_SRC emacs-lisp
   (require 'message)
   (setq message-kill-buffer-on-exit t)
-
 #+END_SRC
 ** gnus
 Most of my gnus config is in an own file, [[file:gnus.org][gnus.org]], here I only have