diff options
| author | Richard M. Stallman | 1999-01-19 03:07:53 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1999-01-19 03:07:53 +0000 |
| commit | 265519e3f7184dff54f2aff486d11abaf9c6b0e0 (patch) | |
| tree | 120f52cdefcbfebf19d75a4f363a816b8b5fb99d | |
| parent | 3ea1bd5099e435023964f64762610fc8cdab1e54 (diff) | |
| download | emacs-265519e3f7184dff54f2aff486d11abaf9c6b0e0.tar.gz emacs-265519e3f7184dff54f2aff486d11abaf9c6b0e0.zip | |
(select-safe-coding-system): Hightlight at most 256 characters.
| -rw-r--r-- | lisp/international/mule-cmds.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index c05129bfc17..cc72c2580c0 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -495,7 +495,8 @@ and TO is ignored." | |||
| 495 | (beginning-of-line) | 495 | (beginning-of-line) |
| 496 | (set-window-start (selected-window) (point)) | 496 | (set-window-start (selected-window) (point)) |
| 497 | (save-excursion | 497 | (save-excursion |
| 498 | (while (re-search-forward "[^\000-\177]" to t) | 498 | (while (and (< (length overlays) 256) |
| 499 | (re-search-forward "[^\000-\177]" to t)) | ||
| 499 | (let* ((char (preceding-char)) | 500 | (let* ((char (preceding-char)) |
| 500 | (charset (char-charset char))) | 501 | (charset (char-charset char))) |
| 501 | (when (assq charset non-safe-chars) | 502 | (when (assq charset non-safe-chars) |