Parent Directory | Revision Log | Patch
revision 1.134.4.6 by miles, Fri Apr 2 07:01:02 2004 UTC | revision 1.134.4.7 by miles, Tue Jul 6 09:14:20 2004 UTC | |
---|---|---|
# | Line 448 alternative printed representations that | Line 448 alternative printed representations that |
448 | "Return a string representing CHAR as a character rather than as an integer. | "Return a string representing CHAR as a character rather than as an integer. |
449 | If CHAR is not a character, return nil." | If CHAR is not a character, return nil." |
450 | (and (integerp char) | (and (integerp char) |
451 | (char-valid-p (event-basic-type char)) | (eventp char) |
452 | (let ((c (event-basic-type char))) | (let ((c (event-basic-type char))) |
453 | (concat | (concat |
454 | "?" | "?" |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |