From f2d4ba5eba0b56a33969b72a83dfdecf905f4bb9 Mon Sep 17 00:00:00 2001
From: 10sr <8slashes+git@gmail.com>
Date: Sun, 14 Oct 2012 12:44:24 +0900
Subject: [PATCH] update eshell prefs

---
 emacs.el | 26 ++++++--------------------
 1 file changed, 6 insertions(+), 20 deletions(-)

diff --git a/emacs.el b/emacs.el
index 5bb0440..62ae945 100644
--- a/emacs.el
+++ b/emacs.el
@@ -1547,32 +1547,18 @@ if arg given, use that eshell buffer, otherwise make new eshell buffer."
                                         ; ("ll" "ls -l $*")
                                         ; ("la" "ls -a $*")
                                         ; ("lla" "ls -al $*")
-                      ("ut" "slogin 03110414@un001.ecc.u-tokyo.ac.jp $*")
                       ("aptin" "apt-get install $*")
                       ("eless"
-                       "cat >>> (with-current-buffer \
-(get-buffer-create \"*eshell output\") \
-(erase-buffer) \
-(setq buffer-read-only nil) \
-(current-buffer));\
-(view-buffer (get-buffer \"*eshell output*\"))")
+                       (concat "cat >>> (with-current-buffer "
+                               "(get-buffer-create \"*eshell output\") "
+                               "(erase-buffer) "
+                               "(setq buffer-read-only nil) "
+                               "(current-buffer)) "
+                               "(view-buffer (get-buffer \"*eshell output*\"))")
                       ("g" "git $*")
                       ))
             ))
 
-;; (eval-after-load "em-alias"
-;;   '(progn ;; (eshell/alias "ll" "ls -l")
-;;      ;; (eshell/alias "la" "ls -a")
-;;      ;; (eshell/alias "lla" "ls -al")
-;;      (eshell/alias "sgcc" (if (eq system-type 'windows-nt)
-;;                               "gcc -o win.$1.exe $1"
-;;                             "gcc -o ${uname}.$1.out $1"))
-;;      (eshell/alias "slmgcc" (if (eq system-type 'windows-nt)
-;;                                 "gcc -lm -o win.$1.exe $1"
-;;                               "gcc -lm -o ${uname}.$1.out $1"))
-;;      ;; (eshell/alias "ut" "ssh g841105@un001.ecc.u-tokyo.ac.jp")
-;;      (add-to-list 'recentf-exclude (concat eshell-directory-name "alias"))))
-
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; get last modified date