🚀 go-pugleaf

I have made some fixes to iso-latin1.el some months ago, but forgot to
post them, but here they are. Two problems are solved;

	1) Support for the scandinavian letters is added.

	2) iso-defs-alist is made buffer local to make iso-latin1 mode
	   well-behaved in combination with other modes.


-------------------------------------------------------------------------------
--- /div/src/epoch-4.2/epoch-lisp/iso-latin-1.el	Thu Aug 27 05:51:38 1992
+++ iso-latin-1.el	Thu Jul  2 14:17:44 1992
@@ -18,6 +18,10 @@
 	    (?Y . ?\335)))
     ("," . ((?c . ?\347)(?C . ?\307)))
     ("~" . ((?n . ?\361)(?N . ?\321)))
+    ("/" . ((?o . ?\370)(?O . ?\330)))
+    ("*" . ((?a . ?\345)(?A . ?\305)))
+    ("e" . ((?a . ?\346)(?A . ?\306)))
+    ("E" . ((?A . ?\306)))
     ("<" . ((?< . ?\253)))
     (">" . ((?> . ?\273)))
     
@@ -25,8 +29,9 @@
 
 ;;; structure to hold old definitions of characters
 (defvar iso-defs-alist nil)
+(defvar iso-latin-1-keymap nil)
+(defvar iso-latin-1-mode nil)
 
-
 ;;; two utility functions
 (defun cadr (l) (car (cdr l)))
 
@@ -124,4 +129,8 @@
 			       minor-mode-alist))
   (make-variable-buffer-local 'iso-latin-1-mode)
   (make-variable-buffer-local 'iso-latin-1-keymap)
-  (set-default 'iso-latin-1-mode nil))
+  (make-variable-buffer-local 'iso-defs-alist)
+  (set-default 'iso-latin-1-mode nil)
+  (set-default 'iso-latin-1-keymap nil)
+  (set-default 'iso-latin-1-alist nil))
+
--

-------------------------------------------------------------------------------
Name:	Knut-Håvard Aksnes (ECMA 94) or		Knut-Haavard Aksnes (ASCII)
Ericsson signature: HI/ETN/U/IT KNA		Phone: +47 41 19481
Email: etnkna@etn.ericsson.se (internet)  ETN.ETNKNA (memo)