--- a/keyboard.rc	Mon May 17 09:55:47 2004 +0200
+++ b/keyboard.rc	Mon May 17 10:59:53 2004 +0200
@@ -439,6 +439,7 @@
 map bindValue:#SelectAll  to:#CmdA.         "that is Alt-shift-a"
 map bindValue:#GotoLine   to:#Cmdg.
 map bindValue:#SelectWord to:#Cmdw.         "select word under cursor"
+map bindValue:#Undo       to:#Cmdu.
 
 map bindValue:#Accept     to:#Cmda.
 map bindValue:#Explain    to:#Cmde.