Add corral, fix tramp
authorJoerg Jaspert <joerg.jaspert@dlh.de>
Thu, 15 Oct 2015 09:42:21 +0000 (11:42 +0200)
committerJoerg Jaspert <joerg.jaspert@dlh.de>
Thu, 15 Oct 2015 09:42:21 +0000 (11:42 +0200)
.emacs.d/config/emacs.org

index b2dc5ce..9a9d54e 100644 (file)
@@ -843,10 +843,10 @@ where =temporary-file-directory= is not inside my home).
   :init
   (progn
     (setq backup-directory jj-backup-directory)
-    ;(setq tramp-backup-directory (concat jj-backup-directory "/tramp"))
-    ;(if (not (file-exists-p tramp-backup-directory))
-    ;    (make-directory tramp-backup-directory))
-    ;(setq tramp-backup-directory-alist `((".*" . ,tramp-backup-directory)))
+    (setq tramp-backup-directory (concat jj-backup-directory "/tramp"))
+    (if (not (file-exists-p tramp-backup-directory))
+        (make-directory tramp-backup-directory))
+    (setq tramp-backup-directory-alist `((".*" . ,tramp-backup-directory)))
     (setq backup-directory-alist `(("." . ,jj-backup-directory)))
     (setq auto-save-list-file-prefix (concat jj-backup-directory ".auto-saves-"))
     (setq auto-save-file-name-transforms `((".*" ,jj-backup-directory t)))
@@ -929,7 +929,35 @@ are saved automatically when they are killed"
                       'font-lock-face 'calendar-iso-week-header-face))))
 
 #+END_SRC
-
+** corral
+[2015-10-15 Thu 11:34] 
+Corral is a lightweight package that lets you quickly wrap parentheses
+and other delimiters around text, intuitively surrounding what you
+want it to using just two commands.
+#+BEGIN_SRC emacs-lisp
+(use-package corral
+  :ensure corral
+  :idle
+  (progn
+    ; Interpret # and * as part of the word
+    (setq corral-syntax-entries '((?# "_")
+                                  (?* "_")))
+    (defhydra hydra-corral (:columns 4)
+      "Corral"
+      ("(" corral-parentheses-backward "Back")
+      (")" corral-parentheses-forward "Forward")
+      ("[" corral-brackets-backward "Back")
+      ("]" corral-brackets-forward "Forward")
+      ("{" corral-braces-backward "Back")
+      ("}" corral-braces-forward "Forward")
+      ("\"" corral-double-quotes-backward "Back")
+      ("2" corral-double-quotes-forward "Forward")
+      ("'" corral-single-quotes-backward "Back")
+      ("#" corral-single-quotes-forward "Forward")
+      ("." hydra-repeat "Repeat"))
+    (bind-key "C-c c" 'hydra-corral/body)
+    ))
+#+END_SRC
 ** crontab-mode
 [2013-05-21 Tue 23:18]
 #+BEGIN_SRC emacs-lisp