From 86b459aa73dcb55d6a8f9d2c2f9eb4c5b6637371 Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alexander@sulfrian.net>
Date: Wed, 25 Apr 2012 00:00:13 +0200
Subject: emacs: you could use "C-x k" to close a client file

---
 emacs | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/emacs b/emacs
index 0f7a18e..5427da1 100644
--- a/emacs
+++ b/emacs
@@ -209,7 +209,14 @@
 (when (require 'server nil 'noerror)
   (if (and (fboundp 'server-running-p)
 	   (not (server-running-p)))
-      (server-start)))
+      (server-start))
+
+  (add-hook 'server-switch-hook
+          (lambda ()
+            (when (current-local-map)
+              (use-local-map (copy-keymap (current-local-map))))
+            (when server-buffer-clients
+              (local-set-key (kbd "C-x k") 'server-edit)))))
 
 ; emacs code browser
 (when (require 'ecb nil 'noerror)
-- 
cgit v1.2.3