Lines Matching defs:thing
290 (calc-describe-thing desc "Key Index" nil
331 (calc-describe-thing func "Command Index")
332 (calc-describe-thing func "Function Index")))
343 (calc-describe-thing var "Variable Index"))
345 (defun calc-describe-thing (thing where &optional target not-quoted)
346 (message "Looking for `%s' in %s..." thing where)
351 (regexp-quote thing))
353 (and (string-match "\\`\\([a-z ]*\\)[0-9]\\'" thing)
355 (substring thing 0 -1))
357 (setq thing (format "%s9" (substring thing 0 -1))))
362 (error "Can't find `%s' in %s" thing where)))
367 (or target thing)
368 (or target thing)
369 (or target thing)) nil t)
372 (search-forward (or target thing) nil t)))
373 (search-forward (format "`%s'" (or target thing)) nil t)
374 (search-forward (or target thing) nil t)))
377 (or target thing)
378 (or target thing)
379 (or target thing)) nil t)
380 (search-forward (format "`%s'" (or target thing)) nil t)
381 (search-forward (or target thing) nil t))))
383 (message "Found `%s' in %s" thing where)))