Merge branch 'master' of github.com:kazu-yamamoto/ghc-mod

2013-10-22 09:57:35 +09:00 · 2013-10-22 09:57:35 +09:00 · 3b2bfbaaeb
commit 3b2bfbaaeb
parent 6011755eb8 4db2f7ac9b
1 changed files with 4 additions and 3 deletions
--- a/elisp/ghc.el
+++ b/elisp/ghc.el
@ -33,9 +33,10 @@
 ;;;

 (defun ghc-find-C-h ()
-  (if keyboard-translate-table
-      (aref keyboard-translate-table ?\C-h)
-    ?\C-h))
+  (or
+   (when keyboard-translate-table
+     (aref keyboard-translate-table ?\C-h))
+   ?\C-h))

 (defvar ghc-completion-key  "\e\t")
 (defvar ghc-document-key    "\e\C-d")