Mercurial > emacs
diff lisp/subr.el @ 56570:059dc717baef
(event-modifiers, event-basic-type): Doc fixes.
author | Luc Teirlinck <teirllm@auburn.edu> |
---|---|
date | Sat, 31 Jul 2004 15:45:30 +0000 |
parents | 1bef61b14e78 |
children | d9455bfd01ee 09f3fd9f680d 0bdb5a16ae51 |
line wrap: on
line diff
--- a/lisp/subr.el Sat Jul 31 15:43:26 2004 +0000 +++ b/lisp/subr.el Sat Jul 31 15:45:30 2004 +0000 @@ -644,7 +644,11 @@ "Return a list of symbols representing the modifier keys in event EVENT. The elements of the list may include `meta', `control', `shift', `hyper', `super', `alt', `click', `double', `triple', `drag', -and `down'." +and `down'. +EVENT may be an event or an event type. If EVENT is a symbol +that has never been used in an event that has been read as input +in the current Emacs session, then this function can return nil, +even when EVENT actually has modifiers." (let ((type event)) (if (listp type) (setq type (car type))) @@ -671,7 +675,10 @@ (defun event-basic-type (event) "Return the basic type of the given event (all modifiers removed). -The value is a printing character (not upper case) or a symbol." +The value is a printing character (not upper case) or a symbol. +EVENT may be an event or an event type. If EVENT is a symbol +that has never been used in an event that has been read as input +in the current Emacs session, then this function may return nil." (if (consp event) (setq event (car event))) (if (symbolp event)