Mercurial > hg > xemacs-beta

diff lisp/utils/skeleton.el @ 20:859a2309aef8 r19-15b93

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b93
author cvs
date Mon, 13 Aug 2007 08:50:05 +0200
parents ac2d302a0011
children 56c54cf7c5b6
line wrap: on
line diff
--- a/lisp/utils/skeleton.el	Mon Aug 13 08:49:44 2007 +0200
+++ b/lisp/utils/skeleton.el	Mon Aug 13 08:50:05 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