Parent Directory | Revision Log | Patch
revision 1.13.4.7 by handa, Tue Aug 17 12:12:57 2004 UTC | revision 1.13.4.8 by miles, Tue Sep 21 09:34:09 2004 UTC | |
---|---|---|
# | Line 517 as well as widgets, buttons, overlays, a | Line 517 as well as widgets, buttons, overlays, a |
517 | (push (format "%s;" (pop props)) ps)) | (push (format "%s;" (pop props)) ps)) |
518 | (list (cons "Properties" (nreverse ps))))) | (list (cons "Properties" (nreverse ps))))) |
519 | ("to input" | ("to input" |
520 | ,@(let ((key-list (and current-input-method | ,@(let ((key-list (and (eq input-method-function |
521 | 'quail-input-method) | |
522 | (quail-find-key char)))) | (quail-find-key char)))) |
523 | (if (consp key-list) | (if (consp key-list) |
524 | (list "type" | (list "type" |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |