/[emacs]/emacs/lisp/descr-text.el
ViewVC logotype

Diff of /emacs/lisp/descr-text.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.26 by jurta, Sun May 23 20:59:28 2004 UTC revision 1.27 by handa, Tue Sep 21 02:26:24 2004 UTC
# Line 525  as well as widgets, buttons, overlays, a Line 525  as well as widgets, buttons, overlays, a
525                      (push (format "%s;" (pop props)) ps))                      (push (format "%s;" (pop props)) ps))
526                    (list (cons "Properties" (nreverse ps)))))                    (list (cons "Properties" (nreverse ps)))))
527              ("to input"              ("to input"
528               ,@(let ((key-list (and current-input-method               ,@(let ((key-list (and (eq input-method-function
529                                            'quail-input-method)
530                                      (quail-find-key char))))                                      (quail-find-key char))))
531                   (if (consp key-list)                   (if (consp key-list)
532                       (list "type"                       (list "type"

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26