Lines Matching +defs:no +defs:message
62 last input, no documentation will be printed.
64 If this variable is set to 0, no idle time is required."
106 (defvar eldoc-message-commands-table-size 31
107 "This is used by eldoc-add-command to initialize eldoc-message-commands
114 (defconst eldoc-message-commands
115 (make-vector eldoc-message-commands-table-size 0)
130 (defvar eldoc-last-message nil)
151 (setq eldoc-last-message nil)
179 (defun eldoc-message (&rest args)
180 (let ((omessage eldoc-last-message))
181 (setq eldoc-last-message
182 (cond ((eq (car args) eldoc-last-message) eldoc-last-message)
184 ;; If only one arg, no formatting to do, so put it in
185 ;; eldoc-last-message so eq test above might succeed on
193 (let ((message-log-max nil))
194 (cond (eldoc-last-message (message "%s" eldoc-last-message))
195 (omessage (message nil)))))
196 eldoc-last-message)
201 ;; begins. This function reprints the last eldoc message immediately
205 (and eldoc-last-message
206 (if (eldoc-display-message-no-interference-p)
207 (eldoc-message eldoc-last-message)
208 (setq eldoc-last-message nil))))
210 ;; Decide whether now is a good time to display a message.
211 (defun eldoc-display-message-p ()
212 (and (eldoc-display-message-no-interference-p)
220 eldoc-message-commands))))
224 (defun eldoc-display-message-no-interference-p ()
238 The function of no args should return a one-line string for displaying
240 It should return nil if there's no doc appropriate for the context.
249 (and (eldoc-display-message-p)
251 (eldoc-message (funcall eldoc-documentation-function))
261 (eldoc-message doc))))
264 (error (message "eldoc error: %s" err))))
267 ;; docstring if function is a subr and no arglist is obtainable from the
419 (set (intern name eldoc-message-commands) t)))
429 (unintern name eldoc-message-commands)))
434 (all-completions name eldoc-message-commands))))