• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/progmodes/

Lines Matching +defs:new +defs:prompt

410            find-file       Add info for new IDLWAVE buffers.
852 ;; indented via line splitting, auto-filling or a new line creation.
1921 (set (make-local-variable 'comment-add) 1) ; ";;" for new and regions
1996 (idlwave-new-buffer-update)
2232 ;; Start new line if we are not in a new line
2340 ;; beginning of the new line skipping the leading indentation.
2342 ;; The reason we insert the new line before indenting is that the
2378 then the new line will contain a comment with the same indentation.
2406 (indent-new-comment-line))
2412 ;; Reindent new line
2549 (defvar idlwave-shell-prompt-pattern)
2558 (if (re-search-backward idlwave-shell-prompt-pattern nil t)
2623 ;; we reach a new statement.
2671 statement is on a new line or is a subpart of the current statement.
2855 (let ((fill-column (if (fboundp 'comment-indent-new-line)
3569 ;; Although do-auto-fill (via indent-new-comment-line) calls
3570 ;; idlwave-indent-line for the new line, re-indent again
3761 (defun idlwave-template (s1 s2 &optional prompt noindent)
3762 "Build a template with optional prompt expression.
3795 (if (stringp prompt)
3796 (message prompt)))))
4132 ;; to search, which is a large performance boost. All new strings
4253 SET: also set new patterns. Probably this will always have to be t.
4255 (let (entry name type class kwds res source call new)
4293 (setq new (nconc (list name type class source call) kwds)
4294 res (cons new res)))
4297 ;; Creating new sintern tables
4299 (defun idlwave-new-sintern-type (tag)
4300 "Define a variable and a function to sintern the new type TAG.
4412 (error "Process killed, no new process started"))
4809 (let (alias remove-list new parts all-parts)
4812 (setq new (assoc (cdr x) all-parts))
4813 (unless new
4814 (setq new (cons (cdr x) parts))
4815 (push new all-parts))
4816 (setcdr new (delete (car x) (cdr new)))))
4835 (let (alias remove-list new parts all-parts)
5179 (defun idlwave-new-buffer-update ()
5203 (defun idlwave-replace-buffer-routine-info (file new)
5220 (append new (delq nil idlwave-buffer-routines)))))
6385 ;; current routine. otherwise prompt the user for a class name.
6720 (defun idlwave-complete-in-buffer (type stype list selector prompt isa
6734 (error (concat prompt ": No completions available")))
6758 (error (concat prompt ": no completion for \"%s\"") part))
6817 (idlwave-display-completion-list list prompt beg complete))
7095 (defun idlwave-one-key-select (sym prompt delay)
7112 ;; Need to make new list
7116 ;; Display prompt and wait for quick reply
7117 (message "%s[%s]" prompt
7222 (let ((new-map (copy-keymap old-map)))
7223 (define-key new-map [button3up] 'idlwave-mouse-completion-help)
7224 (define-key new-map [button3] (lambda ()
7227 new-map))
7246 (let ((new-map (copy-keymap old-map)))
7248 'choose-completion 'idlwave-choose-completion new-map)
7250 'mouse-choose-completion 'idlwave-mouse-choose-completion new-map)
7251 (define-key new-map [mouse-3] 'idlwave-mouse-completion-help)
7252 new-map))
7603 (idlwave-new-sintern-type 'class-tag)
7661 (idlwave-new-sintern-type 'sysvar)
7662 (idlwave-new-sintern-type 'sysvartag)
7816 "Get any new system variables and tags."
9114 ;; Here we hack func-menu.el in order to support this new mode.