aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2010-12-04 19:55:00 -0500
committerChong Yidong2010-12-04 19:55:00 -0500
commit637c2c4396accc9734673751fe249c4914804477 (patch)
treee7826050faec42850c6f046fbb08f1f9a33442c0
parent74194465d771110242a989e527000cbb896a6af2 (diff)
downloademacs-637c2c4396accc9734673751fe249c4914804477.tar.gz
emacs-637c2c4396accc9734673751fe249c4914804477.zip
Doc fixes for comint functions (Bug#7499).
* lisp/comint.el (comint-dynamic-list-input-ring) (comint-dynamic-complete-filename) (comint-replace-by-expanded-filename) (comint-dynamic-simple-complete) (comint-dynamic-list-filename-completions) (comint-dynamic-list-completions): Doc fix (Bug#7499).
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/comint.el37
2 files changed, 26 insertions, 18 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7dce76c1c22..3f348399aca 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,12 @@
12010-12-05 Chong Yidong <cyd@stupidchicken.com> 12010-12-05 Chong Yidong <cyd@stupidchicken.com>
2 2
3 * comint.el (comint-dynamic-list-input-ring)
4 (comint-dynamic-complete-filename)
5 (comint-replace-by-expanded-filename)
6 (comint-dynamic-simple-complete)
7 (comint-dynamic-list-filename-completions)
8 (comint-dynamic-list-completions): Doc fix (Bug#7499).
9
3 * subr.el (posn-x-y, posn-object-x-y, posn-object-width-height): 10 * subr.el (posn-x-y, posn-object-x-y, posn-object-width-height):
4 Doc fix (Bug#7471). 11 Doc fix (Bug#7471).
5 12
diff --git a/lisp/comint.el b/lisp/comint.el
index aa0e1599537..09c444187b4 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1000,7 +1000,7 @@ See also `comint-read-input-ring'."
1000 (choose-completion-string completion buffer))) 1000 (choose-completion-string completion buffer)))
1001 1001
1002(defun comint-dynamic-list-input-ring () 1002(defun comint-dynamic-list-input-ring ()
1003 "List in help buffer the buffer's input history." 1003 "Display a list of recent inputs entered into the current buffer."
1004 (interactive) 1004 (interactive)
1005 (if (or (not (ring-p comint-input-ring)) 1005 (if (or (not (ring-p comint-input-ring))
1006 (ring-empty-p comint-input-ring)) 1006 (ring-empty-p comint-input-ring))
@@ -2996,7 +2996,7 @@ Completes if after a filename. See `comint-match-partial-filename' and
2996This function is similar to `comint-replace-by-expanded-filename', except that 2996This function is similar to `comint-replace-by-expanded-filename', except that
2997it won't change parts of the filename already entered in the buffer; it just 2997it won't change parts of the filename already entered in the buffer; it just
2998adds completion characters to the end of the filename. A completions listing 2998adds completion characters to the end of the filename. A completions listing
2999may be shown in a help buffer if completion is ambiguous. 2999may be shown in a separate buffer if completion is ambiguous.
3000 3000
3001Completion is dependent on the value of `comint-completion-addsuffix', 3001Completion is dependent on the value of `comint-completion-addsuffix',
3002`comint-completion-recexact' and `comint-completion-fignore', and the timing of 3002`comint-completion-recexact' and `comint-completion-fignore', and the timing of
@@ -3083,11 +3083,11 @@ See `comint-dynamic-complete-filename'. Returns t if successful."
3083 3083
3084(defun comint-replace-by-expanded-filename () 3084(defun comint-replace-by-expanded-filename ()
3085 "Dynamically expand and complete the filename at point. 3085 "Dynamically expand and complete the filename at point.
3086Replace the filename with an expanded, canonicalized and completed replacement. 3086Replace the filename with an expanded, canonicalized and
3087\"Expanded\" means environment variables (e.g., $HOME) and `~'s are replaced 3087completed replacement, i.e. substituting environment
3088with the corresponding directories. \"Canonicalized\" means `..' and `.' are 3088variables (e.g. $HOME), `~'s, `..', and `.', and making the
3089removed, and the filename is made absolute instead of relative. For expansion 3089filename absolute. For expansion see `expand-file-name' and
3090see `expand-file-name' and `substitute-in-file-name'. For completion see 3090`substitute-in-file-name'. For completion see
3091`comint-dynamic-complete-filename'." 3091`comint-dynamic-complete-filename'."
3092 (interactive) 3092 (interactive)
3093 (let ((filename (comint-match-partial-filename))) 3093 (let ((filename (comint-match-partial-filename)))
@@ -3098,15 +3098,16 @@ see `expand-file-name' and `substitute-in-file-name'. For completion see
3098 3098
3099(defun comint-dynamic-simple-complete (stub candidates) 3099(defun comint-dynamic-simple-complete (stub candidates)
3100 "Dynamically complete STUB from CANDIDATES list. 3100 "Dynamically complete STUB from CANDIDATES list.
3101This function inserts completion characters at point by completing STUB from 3101This function inserts completion characters at point by
3102the strings in CANDIDATES. A completions listing may be shown in a help buffer 3102completing STUB from the strings in CANDIDATES. If completion is
3103if completion is ambiguous. 3103ambiguous, possibly show a completions listing in a separate
3104buffer.
3104 3105
3105Returns nil if no completion was inserted. 3106Return nil if no completion was inserted.
3106Returns `sole' if completed with the only completion match. 3107Return `sole' if completed with the only completion match.
3107Returns `shortest' if completed with the shortest of the completion matches. 3108Return `shortest' if completed with the shortest match.
3108Returns `partial' if completed as far as possible with the completion matches. 3109Return `partial' if completed as far as possible.
3109Returns `listed' if a completion listing was shown. 3110Return `listed' if a completion listing was shown.
3110 3111
3111See also `comint-dynamic-complete-filename'." 3112See also `comint-dynamic-complete-filename'."
3112 (let* ((completion-ignore-case (memq system-type '(ms-dos windows-nt cygwin))) 3113 (let* ((completion-ignore-case (memq system-type '(ms-dos windows-nt cygwin)))
@@ -3154,7 +3155,7 @@ See also `comint-dynamic-complete-filename'."
3154 3155
3155 3156
3156(defun comint-dynamic-list-filename-completions () 3157(defun comint-dynamic-list-filename-completions ()
3157 "List in help buffer possible completions of the filename at point." 3158 "Display a list of possible completions for the filename at point."
3158 (interactive) 3159 (interactive)
3159 (let* ((completion-ignore-case read-file-name-completion-ignore-case) 3160 (let* ((completion-ignore-case read-file-name-completion-ignore-case)
3160 ;; If we bind this, it breaks remote directory tracking in rlogin.el. 3161 ;; If we bind this, it breaks remote directory tracking in rlogin.el.
@@ -3183,9 +3184,9 @@ See also `comint-dynamic-complete-filename'."
3183(defvar comint-dynamic-list-completions-config nil) 3184(defvar comint-dynamic-list-completions-config nil)
3184 3185
3185(defun comint-dynamic-list-completions (completions &optional common-substring) 3186(defun comint-dynamic-list-completions (completions &optional common-substring)
3186 "List in help buffer sorted COMPLETIONS. 3187 "Display a list of sorted COMPLETIONS.
3187The meaning of COMMON-SUBSTRING is the same as in `display-completion-list'. 3188The meaning of COMMON-SUBSTRING is the same as in `display-completion-list'.
3188Typing SPC flushes the help buffer." 3189Typing SPC flushes the completions buffer."
3189 (let ((window (get-buffer-window "*Completions*" 0))) 3190 (let ((window (get-buffer-window "*Completions*" 0)))
3190 (setq completions (sort completions 'string-lessp)) 3191 (setq completions (sort completions 'string-lessp))
3191 (if (and (eq last-command this-command) 3192 (if (and (eq last-command this-command)