mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-30 08:09:04 +00:00
Code Issues Releases Activity

(skeleton-internal-1): Use integerp and stringp

Browse Source 
instead of char-or-string-p to catch -1.
This commit is contained in:
Kenichi Handa 2007-09-07 02:14:55 +00:00
parent 8d25d881a0
commit db08e41d23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/skeleton.el
View File

@ -355,7 +355,7 @@ automatically, and you are prompted to fill in the variable parts.")))
(defun skeleton-internal-1 (element &optional literal recursive)
(cond
((char-or-string-p element)
((or (integerp element) (stringp element))
(if (and (integerp element) ; -num
(< element 0))
(if skeleton-untabify