Auto commit by The Sugar System.

diff --git a/dot-files/_emacs_el b/dot-files/_emacs_el
index 680cb9a3f7c1ab03f69477d2d7599dd75fa78543..e439c5e2b5013c0f6f40ac73552e7d27893e5d13 100644 (file)
--- a/dot-files/_emacs_el
+++ b/dot-files/_emacs_el
@@ -48,10 +48,12 @@
            (setq browse-url-firefox-program "/opt/local/bin/firefox")
            ;; Specify how to connect to some of the remote servers.
            (setq tramp-default-proxies-alist nil)
-           (add-to-list 'tramp-default-proxies-alist
-                        '("rd8" nil "/sshx:pho@yebisu1.ymir.jp:"))
-           (add-to-list 'tramp-default-proxies-alist
-                        '("yebisu1\\.ymir\\.jp" nil "/sshx:pho@boss:"))))))
+           (mapcar #'(lambda (proxy)
+                       (add-to-list 'tramp-default-proxies-alist proxy))
+            '( ("rd8"                                 nil "/sshx:pho@yebisu1.ymir.jp:")
+               ("pho\\.dev\\.office\\.ymir\\.co\\.jp" nil "/sshx:pho@yebisu1.ymir.jp:")
+               ("yebisu1\\.ymir\\.jp"                 nil "/sshx:pho@boss:"           )
+               ))))))
 
 ;; Settings for Browser --------------------------------------------------------
 (setq browse-url-browser-function 'w3m-browse-url)