Lines Matching +defs:xemacs +defs:form
407 INTERACTIVE-FORM ::= Optional interactive form to be used for the advised
2549 don't offer a form of remote control.
2636 The remaining arguments form a sequence of PROPERTY VALUE pairs,
2650 The remaining arguments form a sequence of PROPERTY VALUE pairs,
2662 The remaining arguments form a sequence of PROPERTY VALUE pairs,
2674 The remaining arguments form a sequence of PROPERTY VALUE pairs,
2691 The remaining arguments form a sequence of PROPERTY VALUE pairs,
2759 Compile and evaluate the current top-level form.
2761 With argument, insert value in current buffer after the form.
2878 Return value will either be the formatted result in string form,
2879 or a list containing a character position and an error message in string form.
2945 ;;;;;; american-calendar-display-form european-calendar-display-form
3275 (defvar european-calendar-display-form (quote ((if dayname (concat dayname ", ")) day " " monthname " " year)) "\
3277 See the documentation of `calendar-date-display-form' for an explanation.")
3279 (custom-autoload (quote european-calendar-display-form) "calendar" t)
3281 (defvar american-calendar-display-form (quote ((if dayname (concat dayname ", ")) monthname " " day ", " year)) "\
3283 See the documentation of `calendar-date-display-form' for an explanation.")
3285 (custom-autoload (quote american-calendar-display-form) "calendar" t)
3303 of the form
3339 by date, of all relevant diary entries in the form of ((MONTH DAY YEAR)
3371 of the form
3760 is an association list describing the style and must be of the form:
3829 CCL-PROGRAM has this form:
3862 ;; The following form is the same as (r0 = integer).
4172 Evaluate the current form with `eval-defun' and check its documentation.
4173 Evaluation is done first so the form will be read before the
4303 a form for evaluation. If PATTERN is empty (or nil), every form in the
4304 command history is offered. The form is placed in the minibuffer for
4509 Each association in the alist has the form (NNN . CHARSET), where NNN is the
4555 via `start-process', or a cons pair of the form (HOST . SERVICE) denoting a TCP
4568 via `start-process', or a cons pair of the form (HOST . SERVICE) denoting a TCP
4915 rule of the form (GLOBAL-REF-POINT . NEW-REF-POINT), where
5015 A composition rule is a cons of glyph reference points of the form
5084 The argument is a parameterized event of the form
5396 Use \\[cperl-invert-if-unless] to change a construction of the form
5893 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
5903 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
5988 The elements are of the form (KEY TYPE PRE-FILTER POST-FILTER),
6006 The arguments should be a list where each entry has the form:
6024 Each of the arguments ARGS has this form:
6036 Each of the arguments ARGS has this form:
6345 form, in which case stepping is not possible. Break-on-entry for
6640 evaluates the desktop file. List elements must have the form
6679 List elements must have the form
7969 CSS contains a list of syntax specifications of the form (CHAR . SYNTAX).
8020 Alternatively, a menu item may have the form:
8243 The EPS file name has the following form:
8265 The EPS file name has the following form:
8587 ;;;### (autoloads (edebug-all-forms edebug-all-defs edebug-eval-top-level-form
8615 `edebug-form-spec' property.
8619 (defalias (quote edebug-defun) (quote edebug-eval-top-level-form))
8621 (autoload (quote edebug-eval-top-level-form) "edebug" "\
8622 Evaluate the top level form point is in, stepping through with Edebug.
8911 (defmacro ediff-cond-compile-for-xemacs-or-emacs (xemacs-form emacs-form) (if (string-match "XEmacs" emacs-version) xemacs-form emacs-form))
8913 (ediff-cond-compile-for-xemacs-or-emacs (defun ediff-xemacs-init-menus nil (if (featurep (quote menubar)) (progn (add-submenu (quote ("Tools")) ediff-menu "OO-Browser...") (add-submenu (quote ("Tools")) ediff-merge-menu "OO-Browser...") (add-submenu (quote ("Tools")) epatch-menu "OO-Browser...") (add-submenu (quote ("Tools")) ediff-misc-menu "OO-Browser...") (add-menu-button (quote ("Tools")) "-------" "OO-Browser...")))) nil)
8915 (ediff-cond-compile-for-xemacs-or-emacs (progn (defvar ediff-menu (quote ("Compare" ["Two Files..." ediff-files t] ["Two Buffers..." ediff-buffers t] ["Three Files..." ediff-files3 t] ["Three Buffers..." ediff-buffers3 t] "---" ["Two Directories..." ediff-directories t] ["Three Directories..." ediff-directories3 t] "---" ["File with Revision..." ediff-revision t] ["Directory Revisions..." ediff-directory-revisions t] "---" ["Windows Word-by-word..." ediff-windows-wordwise t] ["Windows Line-by-line..." ediff-windows-linewise t] "---" ["Regions Word-by-word..." ediff-regions-wordwise t] ["Regions Line-by-line..." ediff-regions-linewise t]))) (defvar ediff-merge-menu (quote ("Merge" ["Files..." ediff-merge-files t] ["Files with Ancestor..." ediff-merge-files-with-ancestor t] ["Buffers..." ediff-merge-buffers t] ["Buffers with Ancestor..." ediff-merge-buffers-with-ancestor t] "---" ["Directories..." ediff-merge-directories t] ["Directories with Ancestor..." ediff-merge-directories-with-ancestor t] "---" ["Revisions..." ediff-merge-revisions t] ["Revisions with Ancestor..." ediff-merge-revisions-with-ancestor t] ["Directory Revisions..." ediff-merge-directory-revisions t] ["Directory Revisions with Ancestor..." ediff-merge-directory-revisions-with-ancestor t]))) (defvar epatch-menu (quote ("Apply Patch" ["To a file..." ediff-patch-file t] ["To a buffer..." ediff-patch-buffer t]))) (defvar ediff-misc-menu (quote ("Ediff Miscellanea" ["Ediff Manual" ediff-documentation t] ["Customize Ediff" ediff-customize t] ["List Ediff Sessions" ediff-show-registry t] ["Use separate frame for Ediff control buffer" ediff-toggle-multiframe :style toggle :selected (if (and (featurep (quote ediff-util)) (boundp (quote ediff-window-setup-function))) (eq ediff-window-setup-function (quote ediff-setup-windows-multiframe)))] ["Use a toolbar with Ediff control buffer" ediff-toggle-use-toolbar :style toggle :selected (if (featurep (quote ediff-tbar)) (ediff-use-toolbar-p))]))) (if (and (featurep (quote menubar)) (not (featurep (quote infodock))) (not (featurep (quote ediff-hook)))) (ediff-xemacs-init-menus))) (if (featurep (quote menu-bar)) (progn (defvar menu-bar-ediff-misc-menu (make-sparse-keymap "Ediff Miscellanea")) (fset (quote menu-bar-ediff-misc-menu) (symbol-value (quote menu-bar-ediff-misc-menu))) (defvar menu-bar-epatch-menu (make-sparse-keymap "Apply Patch")) (fset (quote menu-bar-epatch-menu) (symbol-value (quote menu-bar-epatch-menu))) (defvar menu-bar-ediff-merge-menu (make-sparse-keymap "Merge")) (fset (quote menu-bar-ediff-merge-menu) (symbol-value (quote menu-bar-ediff-merge-menu))) (defvar menu-bar-ediff-menu (make-sparse-keymap "Compare")) (fset (quote menu-bar-ediff-menu) (symbol-value (quote menu-bar-ediff-menu))) (define-key menu-bar-ediff-menu [window] (quote ("This Window and Next Window" . compare-windows))) (define-key menu-bar-ediff-menu [ediff-windows-linewise] (quote ("Windows Line-by-line..." . ediff-windows-linewise))) (define-key menu-bar-ediff-menu [ediff-windows-wordwise] (quote ("Windows Word-by-word..." . ediff-windows-wordwise))) (define-key menu-bar-ediff-menu [separator-ediff-windows] (quote ("--"))) (define-key menu-bar-ediff-menu [ediff-regions-linewise] (quote ("Regions Line-by-line..." . ediff-regions-linewise))) (define-key menu-bar-ediff-menu [ediff-regions-wordwise] (quote ("Regions Word-by-word..." . ediff-regions-wordwise))) (define-key menu-bar-ediff-menu [separator-ediff-regions] (quote ("--"))) (define-key menu-bar-ediff-menu [ediff-dir-revision] (quote ("Directory Revisions..." . ediff-directory-revisions))) (define-key menu-bar-ediff-menu [ediff-revision] (quote ("File with Revision..." . ediff-revision))) (define-key menu-bar-ediff-menu [separator-ediff-directories] (quote ("--"))) (define-key menu-bar-ediff-menu [ediff-directories3] (quote ("Three Directories..." . ediff-directories3))) (define-key menu-bar-ediff-menu [ediff-directories] (quote ("Two Directories..." . ediff-directories))) (define-key menu-bar-ediff-menu [separator-ediff-files] (quote ("--"))) (define-key menu-bar-ediff-menu [ediff-buffers3] (quote ("Three Buffers..." . ediff-buffers3))) (define-key menu-bar-ediff-menu [ediff-files3] (quote ("Three Files..." . ediff-files3))) (define-key menu-bar-ediff-menu [ediff-buffers] (quote ("Two Buffers..." . ediff-buffers))) (define-key menu-bar-ediff-menu [ediff-files] (quote ("Two Files..." . ediff-files))) (define-key menu-bar-ediff-merge-menu [ediff-merge-dir-revisions-with-ancestor] (quote ("Directory Revisions with Ancestor..." . ediff-merge-directory-revisions-with-ancestor))) (define-key menu-bar-ediff-merge-menu [ediff-merge-dir-revisions] (quote ("Directory Revisions..." . ediff-merge-directory-revisions))) (define-key menu-bar-ediff-merge-menu [ediff-merge-revisions-with-ancestor] (quote ("Revisions with Ancestor..." . ediff-merge-revisions-with-ancestor))) (define-key menu-bar-ediff-merge-menu [ediff-merge-revisions] (quote ("Revisions..." . ediff-merge-revisions))) (define-key menu-bar-ediff-merge-menu [separator-ediff-merge] (quote ("--"))) (define-key menu-bar-ediff-merge-menu [ediff-merge-directories-with-ancestor] (quote ("Directories with Ancestor..." . ediff-merge-directories-with-ancestor))) (define-key menu-bar-ediff-merge-menu [ediff-merge-directories] (quote ("Directories..." . ediff-merge-directories))) (define-key menu-bar-ediff-merge-menu [separator-ediff-merge-dirs] (quote ("--"))) (define-key menu-bar-ediff-merge-menu [ediff-merge-buffers-with-ancestor] (quote ("Buffers with Ancestor..." . ediff-merge-buffers-with-ancestor))) (define-key menu-bar-ediff-merge-menu [ediff-merge-buffers] (quote ("Buffers..." . ediff-merge-buffers))) (define-key menu-bar-ediff-merge-menu [ediff-merge-files-with-ancestor] (quote ("Files with Ancestor..." . ediff-merge-files-with-ancestor))) (define-key menu-bar-ediff-merge-menu [ediff-merge-files] (quote ("Files..." . ediff-merge-files))) (define-key menu-bar-epatch-menu [ediff-patch-buffer] (quote ("To a Buffer..." . ediff-patch-buffer))) (define-key menu-bar-epatch-menu [ediff-patch-file] (quote ("To a File..." . ediff-patch-file))) (define-key menu-bar-ediff-misc-menu [emultiframe] (quote ("Toggle use of separate control buffer frame" . ediff-toggle-multiframe))) (define-key menu-bar-ediff-misc-menu [eregistry] (quote ("List Ediff Sessions" . ediff-show-registry))) (define-key menu-bar-ediff-misc-menu [ediff-cust] (quote ("Customize Ediff" . ediff-customize))) (define-key menu-bar-ediff-misc-menu [ediff-doc] (quote ("Ediff Manual" . ediff-documentation))))))
10155 `tags-loop-scan' is a form to be executed on each file to see if it is
10156 interesting (it returns non-nil if so) and `tags-loop-operate' is a form to
10388 Each escape sequence is of the form \\uXXXX, where XXXX is the
10414 ;;;### (autoloads (eudc-load-eudc eudc-query-form eudc-expand-inline
10453 (autoload (quote eudc-query-form) "eudc" "\
10454 Display a form to query the directory server.
10456 queries the server for the existing fields and displays a corresponding form.
10466 (cond ((not (string-match "XEmacs" emacs-version)) (defvar eudc-tools-menu (make-sparse-keymap "Directory Search")) (fset (quote eudc-tools-menu) (symbol-value (quote eudc-tools-menu))) (define-key eudc-tools-menu [phone] (quote ("Get Phone" . eudc-get-phone))) (define-key eudc-tools-menu [email] (quote ("Get Email" . eudc-get-email))) (define-key eudc-tools-menu [separator-eudc-email] (quote ("--"))) (define-key eudc-tools-menu [expand-inline] (quote ("Expand Inline Query" . eudc-expand-inline))) (define-key eudc-tools-menu [query] (quote ("Query with Form" . eudc-query-form))) (define-key eudc-tools-menu [separator-eudc-query] (quote ("--"))) (define-key eudc-tools-menu [new] (quote ("New Server" . eudc-set-server))) (define-key eudc-tools-menu [load] (quote ("Load Hotlist of Servers" . eudc-load-eudc)))) (t (let ((menu (quote ("Directory Search" ["Load Hotlist of Servers" eudc-load-eudc t] ["New Server" eudc-set-server t] ["---" nil nil] ["Query with Form" eudc-query-form t] ["Expand Inline Query" eudc-expand-inline t] ["---" nil nil] ["Get Email" eudc-get-email t] ["Get Phone" eudc-get-phone t])))) (if (not (featurep (quote eudc-autoloads))) (if eudc-xemacs-p (if (and (featurep (quote menubar)) (not (featurep (quote infodock)))) (add-submenu (quote ("Tools")) menu)) (require (quote easymenu)) (cond ((fboundp (quote easy-menu-add-item)) (easy-menu-add-item nil (quote ("tools")) (easy-menu-create-menu (car menu) (cdr menu)))) ((fboundp (quote easy-menu-create-keymaps)) (define-key global-map [menu-bar tools eudc] (cons "Directory Search" (easy-menu-create-keymaps "Directory Search" (cdr menu)))))))))))
10620 has the form (ABBREV EXPANSION ARG).
11166 Each element, tried in order, has the form (REGEXP . EXTRACT).
11443 FILE should be in a form suitable for passing to `locate-library'.
11693 Major mode to visit files in a field-structured manner using a form.
11959 element of this list should have the same form as an element of
13035 the form \"WINDOW-ID PIXMAP-ID\". Value is non-nil if successful.
13424 the canonical form `...' and the type of reference may be
13613 is issued. The inserted regexps are in the form of font lock keywords.
13615 any valid `font-lock-keywords' form is acceptable. When a file is
13626 form:
13775 Each element has the form
13784 As a special case, START may be a list of the form (COMPLEX-START
14541 ibuffer-make-column-NAME. If INLINE is non-nil, then the form will be
14583 operation is complete, in the form:
14586 confirmation message, in the form:
14596 READER is a form which should read a qualifier from the user.
15537 easy-to-use form.
15890 Called from a program, FILE-OR-NODE may specify an Info node of the form
16390 (defvar ispell-menu-xemacs nil "\
16395 (defvar ispell-menu-map-needed (and (not ispell-menu-map) (not (featurep (quote xemacs))) (quote reload)))
17021 The value has the form: (START END LAO-STRING), where
17585 Returns a list of the form (FULL-NAME CANONICAL-ADDRESS). If no
17592 the form ((FULL-NAME CANONICAL-ADDRESS) ...) with one element for
18083 If a form, the result from the form will be used instead.")
18923 It is a list of RANGEs, where each RANGE is of the form:
18927 In the first form, valid codes are between FROM1 and TO1, or FROM2 and
18929 The second form is used for 2-byte codes. The car part is the ranges
19124 Nested alist is a list of the form (ENTRY . BRANCHES), where ENTRY is
19125 any Lisp object, and BRANCHES is a list of cons cells of the form
22010 The elements of FACE-EXTENSION list have the form:
22094 form x.y only works if the components are literal
22165 If it is an alist, the element has the form (CHAR . STRING). Each character
22171 `describe-input-method' shows this string while replacing the form
22173 string. For instance, the form \\=\\<quail-translation-docstring> is
22269 rules. Each element has the form (ANNOTATION . VALUE), where
23403 This is a list of elements of the form (REGEXP . NAME-EXP).
23659 FORM is a regular expression in sexp form.
23665 Translate regular expressions REGEXPS in sexp form to a regexp string.
24204 The alias definitions in the file have this form:
24379 of the form (FUNCTION . ARGS) which says how to insert the original.
24599 If BINARY is non-nil, return a string in binary form.
24922 help help-form during interaction with the user or nil
25062 ;;;;;; calendar-longitude calendar-latitude calendar-time-display-form)
25066 (defvar calendar-time-display-form (quote (12-hours ":" minutes am-pm (if time-zone " (") time-zone (if time-zone ")"))) "\
25070 `12-hours', `24-hours', and `minutes', all numbers in string form,
25073 For example, the form
25080 (custom-autoload (quote calendar-time-display-form) "solar" t)
26973 as to form complete rows.
27113 If the value is a form, it is evaluated to get the command to use.")
28363 (defvar tramp-unified-filenames (not (featurep (quote xemacs))) "\
29085 A list of supported DASL search types supported (string form)
31124 Keybindings are of the form MODIFIER-{left,right,up,down}.