Index: /trunk/ccl/hemlock/src/bindings.lisp
===================================================================
--- /trunk/ccl/hemlock/src/bindings.lisp	(revision 719)
+++ /trunk/ccl/hemlock/src/bindings.lisp	(revision 720)
@@ -323,6 +323,9 @@
 (bind-key "Editor Evaluate Expression" #k"meta-escape"  :mode "Editor")
 (bind-key "Editor Evaluate Defun" #k"control-x control-e" :mode "Editor")
+(bind-key "Editor Evaluate Defun" #k"enter" :mode "Editor")
+(bind-key "Editor Evaluate Defun" #k"control-meta-x" :mode "Editor")
 (bind-key "Editor Compile Defun" #k"control-x control-c" :mode "Editor")
 (bind-key "Editor Compile Defun" #k"control-x control-C" :mode "Editor")
+
 (bind-key "Editor Macroexpand Expression" #k"control-m" :mode "Editor")
 (bind-key "Editor Describe Function Call" #k"control-meta-A" :mode "Editor")