diff options
| author | Richard M. Stallman | 2002-01-25 05:06:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-01-25 05:06:14 +0000 |
| commit | a5a08b1f3beddc9bb774a6e5ae51059951b2def0 (patch) | |
| tree | 91cc5454b3f2818be1fca2952e12601252b921fd | |
| parent | 963f49a2b2bc07bd84969ee1b67892d6d4a3d991 (diff) | |
| download | emacs-a5a08b1f3beddc9bb774a6e5ae51059951b2def0.tar.gz emacs-a5a08b1f3beddc9bb774a6e5ae51059951b2def0.zip | |
Comment change.
| -rw-r--r-- | lisp/info-look.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/vhdl-mode.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info-look.el b/lisp/info-look.el index e7aedf47f59..ec5e779d36a 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el | |||
| @@ -369,7 +369,7 @@ If optional argument QUERY is non-nil, query for the help mode." | |||
| 369 | (goto-char (match-beginning 0)) | 369 | (goto-char (match-beginning 0)) |
| 370 | (and (display-color-p) info-lookup-highlight-face | 370 | (and (display-color-p) info-lookup-highlight-face |
| 371 | ;; Search again for ITEM so that the first | 371 | ;; Search again for ITEM so that the first |
| 372 | ;; occurence of ITEM will be highlighted. | 372 | ;; occurrence of ITEM will be highlighted. |
| 373 | (re-search-forward (regexp-quote item)) | 373 | (re-search-forward (regexp-quote item)) |
| 374 | (let ((start (match-beginning 0)) | 374 | (let ((start (match-beginning 0)) |
| 375 | (end (match-end 0))) | 375 | (end (match-end 0))) |
diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el index e41c9bd58ef..e3285595491 100644 --- a/lisp/progmodes/vhdl-mode.el +++ b/lisp/progmodes/vhdl-mode.el | |||
| @@ -8193,7 +8193,7 @@ but not if inside a comment or quote)." | |||
| 8193 | (setq prompt (match-string 1)) | 8193 | (setq prompt (match-string 1)) |
| 8194 | (replace-match "") | 8194 | (replace-match "") |
| 8195 | (setq string (vhdl-template-field prompt nil t)) | 8195 | (setq string (vhdl-template-field prompt nil t)) |
| 8196 | ;; replace occurences of same prompt | 8196 | ;; replace occurrences of same prompt |
| 8197 | (while (re-search-forward (concat "<\\(" prompt "\\)>") end t) | 8197 | (while (re-search-forward (concat "<\\(" prompt "\\)>") end t) |
| 8198 | (replace-match (or string ""))) | 8198 | (replace-match (or string ""))) |
| 8199 | (goto-char position))) | 8199 | (goto-char position))) |