Lines Matching +defs:pre +defs:command +defs:hook
75 (defvar texinfo-command-start)
76 (defvar texinfo-command-end)
77 (defvar texinfo-command-name)
116 name specified in the @setfilename command.
140 (defvar texinfo-pre-format-hook nil
142 The functions on this hook are called with argument BUFFER, the buffer
153 The command is bound to \\[texinfo-format-region]. The text that is
157 (let (texinfo-command-start
158 texinfo-command-end
159 texinfo-command-name
228 (run-hook-with-args 'texinfo-pre-format-hook input-buffer)
237 ;; Install a syntax table useful for scanning command operands.
244 (setq texinfo-command-end (point))
257 ;; so @setfilename command not duplicated.
289 (setq texinfo-command-end (point))
291 (setq texinfo-command-start (point))
327 names specified in the @setfilename command.
356 texinfo-command-start
357 texinfo-command-end
358 texinfo-command-name
381 (setq texinfo-command-end (point))
397 (run-hook-with-args 'texinfo-pre-format-hook input-buffer)
405 (setq texinfo-command-end (point))
418 ;; so @setfilename command not duplicated.
467 ;;; Perform non-@-command file conversions: quotes and hyphens
667 ;; An @raisesections/@lowersections command changes only those
669 ;; command.
674 ;; An @lowersections command cancels an @raisesections command, and
689 For example, an `@lowersections' command is useful if you wish to
692 command changes chapters to sections, sections to subsections and so
705 An `@raisesections' or `@lowersections' command changes only those
707 `@lowersections' command.
709 An `@lowersections' command cancels an `@raisesections' command, and
840 ;; @insertcopying command then inserts the text elsewhere.
866 ;; remove command
891 ;; remove command
905 (error "Use braces to give a command as an argument to @%c"
917 ;; @ is followed by a command-word; find the end of the word.
918 (setq texinfo-command-start (1- (point)))
922 (setq texinfo-command-end (point))
925 (goto-char (1+ texinfo-command-start))
926 (skip-chars-forward "^@" texinfo-command-end)
927 (setq texinfo-command-end (point))
929 (setq texinfo-command-name
933 (1+ texinfo-command-start) texinfo-command-end)))
937 ;; Call the handler for this command.
940 (symbol-name texinfo-command-name)
948 (goto-char texinfo-command-start))
949 (let ((cmd (get texinfo-command-name 'texinfo-format)))
965 as indicated by the @copying ... @end copying command;
966 insert the text with the @insertcopying command."
977 which are indicated by the @copying ... @end copying command."
989 (setq texinfo-command-name (intern (texinfo-parse-line-arg)))
990 (let ((cmd (get texinfo-command-name prop)))
998 "Return argument of @-command as string.
999 Argument is separated from command either by a space or by a brace.
1003 (goto-char texinfo-command-end)
1011 (setq texinfo-command-end (1+ (point))))
1015 (setq texinfo-command-end (point))
1018 (error "Invalid texinfo command arg format")))
1023 (goto-char texinfo-command-end)
1030 (setq texinfo-command-end (1+ (point))))
1034 (setq texinfo-command-end (point))
1037 (error "Invalid texinfo command arg format")))
1038 (setq marker (move-marker (make-marker) texinfo-command-end))
1040 (setq texinfo-command-end (marker-position marker))
1048 (let (texinfo-command-start
1049 texinfo-command-end
1050 texinfo-command-name
1056 "Delete command and argument; return argument of command."
1058 (texinfo-discard-command)))
1060 (defun texinfo-discard-command ()
1061 (delete-region texinfo-command-start texinfo-command-end))
1064 "Discard braces following command, if any."
1065 (goto-char texinfo-command-end)
1070 (setq texinfo-command-end (point)))
1074 (delete-region texinfo-command-start texinfo-command-end)))
1094 (setq texinfo-command-end (point))
1126 (setq texinfo-command-end (point))
1130 (goto-char texinfo-command-end)
1133 (setq texinfo-command-end (1+ (point)))
1134 (let ((marker (move-marker (make-marker) texinfo-command-end)))
1136 (setq texinfo-command-end (marker-position marker))
1158 (goto-char texinfo-command-end)
1161 (error "Extraneous text at end of command line"))
1162 (goto-char texinfo-command-start)
1164 (error "Extraneous text at beginning of command line"))
1168 (goto-char texinfo-command-start)
1193 (texinfo-discard-command)
1234 (put 'menu 'texinfo-end 'texinfo-discard-command)
1249 (put 'detailmenu 'texinfo-end 'texinfo-discard-command)
1279 (texinfo-discard-command)
1303 (texinfo-discard-command)
1322 (texinfo-discard-command)
1327 (goto-char texinfo-command-start)))
1401 (texinfo-discard-command)
1406 (texinfo-discard-command))
1410 (texinfo-discard-command))
1436 ;; This command is for HTML output and should never
1442 (delete-region texinfo-command-start
1454 (texinfo-discard-command)
1483 ;; In Texinfo, footnotes are created with the `@footnote' command.
1484 ;; This command is followed immediately by a left brace, then by the text of
1500 ;; Footnote style is specified by the @footnotestyle command, either
1541 (progn (goto-char node-name-beginning) ; skip over node command
1549 (texinfo-discard-command) ; remove or insert whitespace, as needed
1585 (texinfo-discard-command) ; remove or insert whitespace, as needed
1620 Used by @refill indenting command to avoid indenting within lists, etc.")
1625 (cons (list check arg texinfo-command-start)
1652 (texinfo-discard-command)
1675 (texinfo-discard-command)
1690 (texinfo-discard-command)
1705 (texinfo-discard-command)
1735 ;; Text on same line as @item command.
1791 ;; The `@table' command produces two-column tables.
1814 (texinfo-discard-command)
1821 ;; part of makeinfo.c The command appears to be a relic of the past.
1833 ;; The `@ftable' and `@vtable' commands are like the `@table' command
1878 (texinfo-discard-command)
1932 ;; onto the `texinfo-stack'. At the @end multitable command, the stack
1933 ;; is checked for its matching @multitable command, and then popped, or
1934 ;; else an error is signaled. Also, this command pushes the location of
1944 ;; to the @multitable command (by arguments, I mean the text on the rest
1949 ;; This command is executed when texinfmt sees @item inside @multitable.
2019 ;; - type-of-command, i.e., multitable
2021 ;; - the position of texinfo-command-start.
2023 ;; The command line is then deleted.
2033 (texinfo-discard-command)
2120 (delete-region texinfo-command-start end)
2129 This command is executed when texinfmt sees @item inside @multitable."
2138 ;; extract-row command deletes the source line in the table.
2168 ;; Delete the @tab command, including the @-sign
2241 ;; Use only the FILENAME argument to the command.
2251 (error "Invalid image command"))
2252 (texinfo-discard-command)
2266 (put 'ifinfo 'texinfo-end 'texinfo-discard-command)
2270 (delete-region texinfo-command-start
2275 (delete-region texinfo-command-start
2280 (delete-region texinfo-command-start
2285 (delete-region texinfo-command-start
2291 (delete-region texinfo-command-start
2296 (delete-region texinfo-command-start
2301 (delete-region texinfo-command-start
2307 (delete-region texinfo-command-start
2311 (put 'ifnotplaintext 'texinfo-end 'texinfo-discard-command)
2314 (put 'ifnottex 'texinfo-end 'texinfo-discard-command)
2317 (put 'ifnothtml 'texinfo-end 'texinfo-discard-command)
2320 (put 'ifnotxml 'texinfo-end 'texinfo-discard-command)
2328 (delete-region texinfo-command-start
2333 ;; @titlespec an alternative titling command; ignored by Info
2337 (delete-region texinfo-command-start
2349 ;; The `@today{}' command requires a pair of braces, like `@dots{}'.
2362 ;; The `@timestamp{}' command requires a pair of braces, like `@dots{}'.
2375 (delete-region texinfo-command-start
2382 ;;; Define the Info enclosure command: @definfoenclose
2384 ;; A `@definfoenclose' command may be used to define a highlighting
2385 ;; command for Info, but not for TeX. A command defined using
2389 ;; Presumably, if you define a command with `@definfoenclose` for Info,
2390 ;; you will also define the same command in the TeX definitions file,
2393 ;; Write a `@definfoenclose' command on a line and follow it with three
2396 ;; `@definfoenclose' is the @-command name \(without the `@'\); the
2402 ;; must follow the command name with two commas in a row; otherwise,
2406 ;; If you do a @definfoenclose{} on the name of a pre-defined macro (such
2410 ;; An enclosure command defined this way takes one argument in braces.
2419 ;; to define `@phoo' as an Info formatting command that inserts `//'
2429 ;; to define `@phoo' as a command that causes TeX to typeset
2440 ;; formatting command that inserts nothing before and a colon after the
2446 (command-name (nth 0 args))
2449 (texinfo-discard-command)
2452 (list command-name
2467 (save-excursion (end-of-line) (setq texinfo-command-end (point)))
2469 (error "Invalid alias command")
2476 (texinfo-discard-command))
2492 (texinfo-discard-command)
2497 ;; @command (for command names)
2498 (put 'command 'texinfo-format 'texinfo-format-code)
2506 (goto-char texinfo-command-start))
2508 ;; @option (for command-line options) must be different from @code
2520 (goto-char texinfo-command-start))
2526 (goto-char texinfo-command-start))
2532 (goto-char texinfo-command-start))
2540 (texinfo-discard-command)
2550 (goto-char texinfo-command-start))
2563 (1+ texinfo-command-end) (+ 2 texinfo-command-end))))
2566 (delete-region texinfo-command-start (+ 2 texinfo-command-end))
2649 (goto-char texinfo-command-start)))
2677 (texinfo-discard-command)
2684 (texinfo-discard-command)
2708 (texinfo-discard-command)
2724 ;; The @cartouche command is a noop in Info; in a printed manual,
2728 (put 'cartouche 'texinfo-end 'texinfo-discard-command)
2734 ;; The @flushleft command left justifies every line but leaves the
2736 ;; `do-nothing' command
2738 ;; The @format command is similar to @example except that it does not
2751 (texinfo-discard-command))
2757 ;; The @flushright command right justifies every line but leaves the
2768 (texinfo-discard-command)
2837 ;;; @refill command.
2847 ;;; But do not refill paragraphs with an @refill command that are
2867 (texinfo-discard-command)
2912 () ; leave @noindent command so @refill command knows not to indent
2946 (texinfo-discard-command)
2972 (indexing-command (intern (concat index-name "index")))
2973 (index-formatting-command ; eg: `texinfo-format-aaindex'
2980 (put indexing-command ; eg, aaindex
2982 index-formatting-command) ; eg, texinfo-format-aaindex
2992 (fset index-formatting-command
3079 (shell-command-on-region opoint (point) "sort -fd" 1))))
3205 ;; (texinfo-discard-command)
3211 ;; (texinfo-discard-command)
3217 ;; (texinfo-discard-command)
3223 ;; (texinfo-discard-command)
3229 ;; (texinfo-discard-command)
3235 ;; (texinfo-discard-command)
3242 (goto-char texinfo-command-start))
3248 (goto-char texinfo-command-start))
3254 (goto-char texinfo-command-start))
3260 (goto-char texinfo-command-start))
3266 (goto-char texinfo-command-start))
3272 (goto-char texinfo-command-start))
3278 (goto-char texinfo-command-start))
3284 (goto-char texinfo-command-start))
3290 (goto-char texinfo-command-start))
3296 (goto-char texinfo-command-start))
3302 (goto-char texinfo-command-start))
3309 (goto-char texinfo-command-start))
3315 (goto-char texinfo-command-start))
3323 (goto-char texinfo-command-start))
3330 (goto-char texinfo-command-start))
3336 (goto-char texinfo-command-start))
3342 (goto-char texinfo-command-start))
3348 (goto-char texinfo-command-start))
3354 (goto-char texinfo-command-start))
3360 (goto-char texinfo-command-start))
3367 (goto-char texinfo-command-start))
3373 (goto-char texinfo-command-start))
3380 (goto-char texinfo-command-start))
3455 (texinfo-discard-command)
3468 (texinfo-defun-type (get texinfo-command-name 'texinfo-defun-type)))
3469 (texinfo-discard-command)
3474 (get texinfo-command-name 'texinfo-deffn-formatting-property) parse-args)
3480 (get texinfo-command-name 'texinfo-defun-indexing-property) parse-args)))
3558 ;; Note: args in lower case, unless modified in command line.
3581 ;; Note: args in lower case, unless modified in command line.
3667 ;; line number. Depending on the which command is used, the entry is
3710 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3736 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3756 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3774 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3794 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3814 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3834 (let ((index-list (get texinfo-command-name 'texinfo-defun-index)))
3853 ;; Each definition command has six properties:
3857 ;; 3. texinfo-format formatting command
3858 ;; 4. texinfo-end end formatting command
3862 ;; The `x' forms of each definition command are used for the second
4047 The command `@set foo This is a string.'
4049 The command `@value{foo}' expands to the value."
4061 The command `@set foo This is a string.'
4063 The command `@value{foo}' expands to the value."
4076 (put 'ifset 'texinfo-end 'texinfo-discard-command)
4089 (delete-region texinfo-command-start
4097 (put 'ifclear 'texinfo-end 'texinfo-discard-command)
4106 (delete-region texinfo-command-start
4135 Note that the Texinfo command and its arguments must be arguments to
4136 the @ifeq command."
4138 (goto-char texinfo-command-end)
4142 ;; @ifeq{arg1, arg2, @command{optional-args}}
4159 (texinfo-command
4167 (delete-region texinfo-command-start stop)
4169 (insert texinfo-command))
4170 (goto-char texinfo-command-start)))
4174 ;;; Process included files: `@include' command
4268 (goto-char texinfo-command-start))
4270 ;; @hyphenation command discards an argument within braces
4271 (put 'hyphenation 'texinfo-format 'texinfo-discard-command-and-arg)
4272 (defun texinfo-discard-command-and-arg ()
4273 "Discard both @-command and its argument in braces."
4274 (goto-char texinfo-command-end)
4276 (setq texinfo-command-end (point))
4277 (delete-region texinfo-command-start texinfo-command-end))
4314 ;; creation with TeX. The Info-validate command checks that every
4315 ;; node pointer points to an existing node. Since this Info command
4316 ;; is not invoked automatically, the @novalidate command is irrelevant
4348 (buffer-substring-no-properties texinfo-command-start texinfo-command-end)))
4354 "Runs texinfo-format-buffer on the files remaining on the command line.
4369 (while command-line-args-left
4370 (setq file (expand-file-name (car command-line-args-left)))
4374 command-line-args-left (cdr command-line-args-left)))
4376 (setq command-line-args-left
4378 (cdr command-line-args-left))))
4381 command-line-args-left (cdr command-line-args-left)))))