[Emacs-diffs] Changes to emacs/lisp/wid-edit.el

[Masatake YAMATO]

Index: emacs/lisp/wid-edit.el
diff -c emacs/lisp/wid-edit.el:1.148 emacs/lisp/wid-edit.el:1.149
*** emacs/lisp/wid-edit.el:1.148        Thu Oct  6 08:20:44 2005
--- emacs/lisp/wid-edit.el      Sun Oct 16 09:31:47 2005
***************
*** 3012,3018 ****
           (with-output-to-temp-buffer "*Completions*"
             (display-completion-list
              (sort (file-name-all-completions name-part directory)
!                   'string<)))
           (message "Making completion list...%s" "done")))))
  
  (defun widget-file-prompt-value (widget prompt value unbound)
--- 3012,3019 ----
           (with-output-to-temp-buffer "*Completions*"
             (display-completion-list
              (sort (file-name-all-completions name-part directory)
!                   'string<)
!             name-part))
           (message "Making completion list...%s" "done")))))
  
  (defun widget-file-prompt-value (widget prompt value unbound)
***************
*** 3571,3577 ****
          (t
           (message "Making completion list...")
           (with-output-to-temp-buffer "*Completions*"
!            (display-completion-list (all-completions prefix list nil)))
           (message "Making completion list...done")))))
  
  (defun widget-color-sample-face-get (widget)
--- 3572,3579 ----
          (t
           (message "Making completion list...")
           (with-output-to-temp-buffer "*Completions*"
!            (display-completion-list (all-completions prefix list nil)
!                                     prefix))
           (message "Making completion list...done")))))
  
  (defun widget-color-sample-face-get (widget)