348 |
form `(command <number of mandatory arguments> <flag determining |
form `(command <number of mandatory arguments> <flag determining |
349 |
if trailing asterisk should be fontified>)' which will match |
if trailing asterisk should be fontified>)' which will match |
350 |
macros of the form \"\\foo[bar]{baz}\", or a list of the form |
macros of the form \"\\foo[bar]{baz}\", or a list of the form |
351 |
`(title <num>)' which is basically the same as the `(comman <num>)' |
`(title <num>)' which is basically the same as the `(command <num>)' |
352 |
list but puts conditional into the keyword highlighter which |
list but puts conditional into the keyword highlighter which |
353 |
tests for `font-latex-fontify-sectioning'.") |
tests for `font-latex-fontify-sectioning'.") |
354 |
|
|
1249 |
(goto-char (match-end 0)) |
(goto-char (match-end 0)) |
1250 |
(if (and asterisk (eq (following-char) ?\*)) |
(if (and asterisk (eq (following-char) ?\*)) |
1251 |
(forward-char 1)) |
(forward-char 1)) |
|
(while (and (forward-comment 1) (< (point) limit))) |
|
1252 |
(setq kend (point)) |
(setq kend (point)) |
1253 |
|
;; FIXME: `forward-comment' should disregard comment starters |
1254 |
|
;; at line beginnings. (Performace hog!) |
1255 |
|
(while (and (< (point) limit) (forward-comment 1))) |
1256 |
;; Optional arguments [...] |
;; Optional arguments [...] |
1257 |
(while (and (< (point) limit) |
(while (and (< (point) limit) |
1258 |
(eq (following-char) ?\[)) |
(eq (following-char) ?\[)) |
1267 |
(goto-char send)))) |
(goto-char send)))) |
1268 |
;; Mandatory arguments {...} |
;; Mandatory arguments {...} |
1269 |
(dotimes (i arg-count) |
(dotimes (i arg-count) |
1270 |
(while (and (forward-comment 1) (< (point) limit))) |
;; FIXME: `forward-comment' should disregard comment starters |
1271 |
|
;; at line beginnings. (Performace hog!) |
1272 |
|
(while (and (< (point) limit) (forward-comment 1))) |
1273 |
(when (and (< (point) limit) |
(when (and (< (point) limit) |
1274 |
(eq (following-char) ?\{)) |
(eq (following-char) ?\{)) |
1275 |
(when (= i 0) (setq cbeg (point))) |
(when (= i 0) (setq cbeg (point))) |