2008-01-15  Katsumi Yamaoka  <yamaoka@jpl.org>

	* keymap.el (suppress-keymap): Remap egg-self-insert-command,
	canna-self-insert-command, and can-n-egg-self-insert-command to
	`undefined'.

--- keymap.el~	2005-06-26 18:04:50 +0000
+++ keymap.el	2008-01-15 09:58:46 +0000
@@ -53,6 +53,12 @@
 Normally, as an exception, digits and minus-sign are set to make prefix args,
 but optional second arg NODIGITS non-nil treats them like other chars."
   (substitute-key-definition 'self-insert-command 'undefined map global-map)
+  (substitute-key-definition 'egg-self-insert-command 'undefined map
+			     global-map)
+  (substitute-key-definition 'canna-self-insert-command 'undefined map
+			     global-map)
+  (substitute-key-definition 'can-n-egg-self-insert-command 'undefined map
+			     global-map)
   (or nodigits
       (let ((string (make-string 1 ?0)))
 	(define-key map "-" 'negative-argument)