← Back to branch summary

~ubuntu-branches/ubuntu/hardy/uim/hardy

« back to all changes in this revision

Viewing changes to emacs/uim-candidate.el

  • Committer: Bazaar Package Importer
  • Author(s): Masahito Omote
  • Date: 2007-04-21 03:46:09 UTC
  • mfrom: (1.1.6 upstream)
  • Revision ID: james.westby@ubuntu.com-20070421034609-gpcurkutp8vaysqj
Tags: 1:1.4.1-3
* Switch to dh_gtkmodules for the gtk 2.10 transition (Closes:
  #419318)
  - debian/control: Add ${misc:Depends} and remove libgtk2.0-bin on
    uim-gtk2.0.
  - debian/uim-gtk2.0.post{inst,rm}: Removed.

Show diffs side-by-side

added added

removed removed

Lines of Context:
emacs/uim-candidate.el
1
1
;; 
2
 
;;  Copyright (c) 2005-2006 uim Project http://uim.freedesktop.org/
 
2
;;  Copyright (c) 2005-2007 uim Project http://uim.freedesktop.org/
3
3
;;
4
4
;;  All rights reserved.
5
5
;;
494
494
               '(lambda (x)
495
495
                  (let ((selected (nth 0 x))
496
496
                        (candlabel (nth 1 x))
497
 
                        (candstr (nth 2 x)))
498
 
 
 
497
                        (candstr (nth 2 x))
 
498
                        eom)
 
499
                    
499
500
                    ;; separate appendix (for prime...)
500
 
                    (if (string-match "\t" candstr) 
501
 
                        (setq candstr (substring candstr 0 (match-beginning 0))))
 
501
                    (if (not uim-candidate-display-appendix)
 
502
                        (when (string-match "\t" candstr)
 
503
                          (setq candstr (substring candstr 0 
 
504
                                                   (match-beginning 0))))
 
505
                      (while (setq eom (string-match "\t" candstr))
 
506
                        (setq candstr
 
507
                              (concat (substring candstr 0 eom)
 
508
                                      " "
 
509
                                      (substring candstr (+ eom 1))))))
 
510
   
502
511
                    (list selected candlabel candstr)
503
512
                    )
504
513
                  ) (cdr candidate))))