🚀 go-pugleaf

Without the following patch (which should work at least with emacs 18 as
well), an error occurs when isearch-mode.el is loaded in epoch:

	Key sequence n uses invalid prefix characters

That key sequence "n" is a single character, ?\356 (238 decimel).

`uname -a' prints:

	SunOS airedale 5.3 Generic sun4m sparc

ChangeLog entry:

Wed May  4 14:07:37 1994  Kevin Rodgers <kevinr@ihs.com>

	* isearch-mode-map: Explicitly set entries in the meta-prefix-
	char keymap (rather than depending on `char-to-string' to map
	meta-characters to escape sequences).

1.4
1494 lines
No id keywords (cm7)
*** Standard Input	Wed May  4 14:36:46 1994
--- isearch-mode.el	Wed May  4 14:08:21 1994
***************
*** 280,291 ****
        ;; keys as well, one full keymap per char of the prefix key.  It
        ;; would be simpler to disable the global keymap, and/or have a
        ;; default local key binding for any key not otherwise bound.
!       (define-key map (char-to-string meta-prefix-char) (make-keymap))
!       (setq i 0)
!       (while (< i len)
! 	(define-key map (char-to-string (+ 128 i)) ;; Needs to be generalized.
! 	  'isearch-other-meta-char)
! 	(setq i (1+ i)))
  
        (define-key map "\M-n" 'isearch-ring-advance)
        (define-key map "\M-p" 'isearch-ring-retreat)
--- 280,291 ----
        ;; keys as well, one full keymap per char of the prefix key.  It
        ;; would be simpler to disable the global keymap, and/or have a
        ;; default local key binding for any key not otherwise bound.
!       (let ((meta-map (make-keymap)))
! 	(define-key map (char-to-string meta-prefix-char) meta-map)
! 	(setq i 0)
! 	(while (< i len)
! 	  (aset meta-map i 'isearch-other-meta-char)
! 	  (setq i (1+ i))))
  
        (define-key map "\M-n" 'isearch-ring-advance)
        (define-key map "\M-p" 'isearch-ring-retreat)
-- 
Kevin Rodgers <kevinr@ihs.com>		Project Engineer
Information Handling Services		Electronic Systems Development
15 Inverness Way East, M/S A203		
Englewood CO 80112 USA			(303) 397-2599 [voice] / -2620 [fax]