Mercurial > hg > xemacs-beta

diff lisp/utils/skeleton.el @ 94:1040fe1366ac xemacs-20-0f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag xemacs-20-0f2
author cvs
date Mon, 13 Aug 2007 09:12:09 +0200
parents 131b0175ea99
children 34a5b81f86ba
line wrap: on
line diff
--- a/lisp/utils/skeleton.el	Mon Aug 13 09:11:41 2007 +0200
+++ b/lisp/utils/skeleton.el	Mon Aug 13 09:12:09 2007 +0200
@@ -391,7 +391,8 @@
 
 
 (defun skeleton-internal-1 (element &optional literal)
-  (cond ((char-or-string-p element)
+  (cond ((or (integerp element)
+	     (char-or-string-p element))
 	 (if (and (integerp element)	; -num
 		  (< element 0))
 	     (if skeleton-untabify