Update of /project/climacs/cvsroot/climacs In directory common-lisp.net:/tmp/cvs-serv586
Modified Files: gui.lisp Log Message: I made a mistake trying to fix the conflict in gui.lisp. It should be OK now.
Date: Sat Dec 25 14:36:21 2004 Author: rstrandh
Index: climacs/gui.lisp diff -u climacs/gui.lisp:1.14 climacs/gui.lisp:1.15 --- climacs/gui.lisp:1.14 Sat Dec 25 13:29:24 2004 +++ climacs/gui.lisp Sat Dec 25 14:36:20 2004 @@ -316,10 +316,6 @@ (add-command-to-command-table command 'c-x-climacs-table :keystroke gesture :errorp nil))
-(defun c-x-set-key (gesture command) - (add-command-to-command-table command 'c-x-climacs-table - :keystroke gesture :errorp nil)) - ;;; for some reason, C-c does not seem to arrive as far as CLIM. (c-x-set-key '(#\q :control) 'com-quit) (c-x-set-key '(#\f :control) 'com-find-file)