diff -Nur symbols-orig/font/a_-acute-accent.sym symbols/font/a_-acute-accent.sym
--- symbols-orig/font/a_-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/a_-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  24
+F á 24
 L 16 0 14 2 3 0 0 0 -1 -1
 L 14 2 14 12 3 0 0 0 -1 -1
 L 14 12 10 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/A-acute-accent.sym symbols/font/A-acute-accent.sym
--- symbols-orig/font/A-acute-accent.sym	2005-03-10 19:21:27.000000000 +0100
+++ symbols/font/A-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  29
+F Á 29
 L 0 0 10 26 3 0 0 0 -1 -1
 L 10 26 20 0 3 0 0 0 -1 -1
 L 4 10 16 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/a_-diaeresis.sym symbols/font/a_-diaeresis.sym
--- symbols-orig/font/a_-diaeresis.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/a_-diaeresis.sym	2005-03-10 19:36:11.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  24
+F ä 24
 L 16 0 14 2 3 0 0 0 -1 -1
 L 14 2 14 12 3 0 0 0 -1 -1
 L 14 12 10 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/A-diaeresis.sym symbols/font/A-diaeresis.sym
--- symbols-orig/font/A-diaeresis.sym	2005-03-10 19:21:27.000000000 +0100
+++ symbols/font/A-diaeresis.sym	2005-03-10 19:36:11.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  29
+F Ä 29
 L 0 0 10 26 3 0 0 0 -1 -1
 L 10 26 20 0 3 0 0 0 -1 -1
 L 4 10 16 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/ae_-lig.sym symbols/font/ae_-lig.sym
--- symbols-orig/font/ae_-lig.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/ae_-lig.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  30
+F æ 30
 L 12 2 12 12 3 0 0 0 -1 -1
 L 12 12 8 16 3 0 0 0 -1 -1
 L 8 16 4 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/AE-lig.sym symbols/font/AE-lig.sym
--- symbols-orig/font/AE-lig.sym	2005-03-10 19:21:27.000000000 +0100
+++ symbols/font/AE-lig.sym	2005-03-10 19:36:11.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  39
+F Æ 39
 L 0 0 12 26 3 0 0 0 -1 -1
 L 12 26 28 26 3 0 0 0 -1 -1
 L 5 10 12 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/a_-ring.sym symbols/font/a_-ring.sym
--- symbols-orig/font/a_-ring.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/a_-ring.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  24
+F å 24
 L 16 0 14 2 3 0 0 0 -1 -1
 L 14 2 14 12 3 0 0 0 -1 -1
 L 14 12 10 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/A-ring.sym symbols/font/A-ring.sym
--- symbols-orig/font/A-ring.sym	2005-03-10 19:21:27.000000000 +0100
+++ symbols/font/A-ring.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  29
+F Å 29
 L 0 0 10 26 3 0 0 0 -1 -1
 L 10 26 20 0 3 0 0 0 -1 -1
 L 4 10 16 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/e_-acute-accent.sym symbols/font/e_-acute-accent.sym
--- symbols-orig/font/e_-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/e_-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F é 20
 L 14 2 10 0 3 0 0 0 -1 -1
 L 10 0 6 0 3 0 0 0 -1 -1
 L 6 0 2 2 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/E-acute-accent.sym symbols/font/E-acute-accent.sym
--- symbols-orig/font/E-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/E-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  29
+F É 29
 L 18 0 0 0 3 0 0 0 -1 -1
 L 0 0 0 26 3 0 0 0 -1 -1
 L 0 26 18 26 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/excl-open.sym symbols/font/excl-open.sym
--- symbols-orig/font/excl-open.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/excl-open.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  14
+F ¡ 14
 L 3 19 3 -1 3 0 0 0 -1 -1
 L 3 26 2 26 3 0 0 0 -1 -1
 L 2 26 1 25 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/i_-acute-accent.sym symbols/font/i_-acute-accent.sym
--- symbols-orig/font/i_-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/i_-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  8
+F í 8
 L 2 0 2 16 3 0 0 0 -1 -1
 L 3 21 6 26 3 0 0 0 -1 -1
 L 6 26 7 26 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/I-acute-accent.sym symbols/font/I-acute-accent.sym
--- symbols-orig/font/I-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/I-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  9
+F Í 9
 L 2 0 2 26 3 0 0 0 -1 -1
 L 3 31 6 36 3 0 0 0 -1 -1
 L 6 36 7 36 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/n_-tilde.sym symbols/font/n_-tilde.sym
--- symbols-orig/font/n_-tilde.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/n_-tilde.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F ñ 20
 L 0 0 0 16 3 0 0 0 -1 -1
 L 0 14 4 16 3 0 0 0 -1 -1
 L 4 16 10 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/N-tilde.sym symbols/font/N-tilde.sym
--- symbols-orig/font/N-tilde.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/N-tilde.sym	2005-03-10 19:36:11.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  28
+F Ñ 28
 L 0 0 0 26 3 0 0 0 -1 -1
 L 0 26 20 0 3 0 0 0 -1 -1
 L 20 0 20 26 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/o_-acute-accent.sym symbols/font/o_-acute-accent.sym
--- symbols-orig/font/o_-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/o_-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F ó 20
 L 6 0 2 2 3 0 0 0 -1 -1
 L 2 2 0 6 3 0 0 0 -1 -1
 L 0 6 0 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/O-acute-accent.sym symbols/font/O-acute-accent.sym
--- symbols-orig/font/O-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/O-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  32
+F Ó 32
 L 14 0 20 4 3 0 0 0 -1 -1
 L 20 4 22 10 3 0 0 0 -1 -1
 L 22 10 22 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/o_-diaeresis.sym symbols/font/o_-diaeresis.sym
--- symbols-orig/font/o_-diaeresis.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/o_-diaeresis.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F ö 20
 L 6 0 2 2 3 0 0 0 -1 -1
 L 2 2 0 6 3 0 0 0 -1 -1
 L 0 6 0 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/O-diaeresis.sym symbols/font/O-diaeresis.sym
--- symbols-orig/font/O-diaeresis.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/O-diaeresis.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  32
+F Ö 32
 L 14 0 20 4 3 0 0 0 -1 -1
 L 20 4 22 10 3 0 0 0 -1 -1
 L 22 10 22 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/o_-slash.sym symbols/font/o_-slash.sym
--- symbols-orig/font/o_-slash.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/o_-slash.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F ø 20
 L 6 0 2 2 3 0 0 0 -1 -1
 L 2 2 0 6 3 0 0 0 -1 -1
 L 0 6 0 10 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/O-slash.sym symbols/font/O-slash.sym
--- symbols-orig/font/O-slash.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/O-slash.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  32
+F Ø 32
 L 14 0 20 4 3 0 0 0 -1 -1
 L 20 4 22 10 3 0 0 0 -1 -1
 L 22 10 22 16 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/quest-open.sym symbols/font/quest-open.sym
--- symbols-orig/font/quest-open.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/quest-open.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  20
+F ¿ 20
 L 14 4 10 0 3 0 0 0 -1 -1
 L 10 0 4 0 3 0 0 0 -1 -1
 L 4 0 0 4 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/u_-acute-accent.sym symbols/font/u_-acute-accent.sym
--- symbols-orig/font/u_-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/u_-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  19
+F ú 19
 L 0 16 0 4 3 0 0 0 -1 -1
 L 0 4 4 0 3 0 0 0 -1 -1
 L 4 0 10 0 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/U-acute-accent.sym symbols/font/U-acute-accent.sym
--- symbols-orig/font/U-acute-accent.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/U-acute-accent.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  27
+F Ú 27
 L 0 26 0 8 3 0 0 0 -1 -1
 L 0 8 2 4 3 0 0 0 -1 -1
 L 2 4 4 2 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/u_-diaeresis.sym symbols/font/u_-diaeresis.sym
--- symbols-orig/font/u_-diaeresis.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/u_-diaeresis.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  19
+F ü 19
 L 0 16 0 4 3 0 0 0 -1 -1
 L 0 4 4 0 3 0 0 0 -1 -1
 L 4 0 10 0 3 0 0 0 -1 -1
diff -Nur symbols-orig/font/U-diaeresis.sym symbols/font/U-diaeresis.sym
--- symbols-orig/font/U-diaeresis.sym	2005-03-10 19:21:28.000000000 +0100
+++ symbols/font/U-diaeresis.sym	2005-03-10 19:36:12.000000000 +0100
@@ -1,5 +1,5 @@
 v 20031231 1
-F  27
+F Ü 27
 L 0 26 0 8 3 0 0 0 -1 -1
 L 0 8 2 4 3 0 0 0 -1 -1
 L 2 4 4 2 3 0 0 0 -1 -1
diff -Nur symbols-orig/system-gafrc.in symbols/system-gafrc.in
--- symbols-orig/system-gafrc.in	2005-03-10 19:27:10.000000000 +0100
+++ symbols/system-gafrc.in	2005-03-10 19:36:14.000000000 +0100
@@ -219,161 +219,63 @@
 (map-font-character-to-file "|" (string-append default-font-directory "@PATHSEP@" 
 					       "vbar.sym"))
 
-; A-umlaut finnish/swedish/german 
-(map-font-character-to-file 
- (string (integer->char 196))
- (string-append default-font-directory "@PATHSEP@" 
-		"A-diaeresis.sym"))
-
-; A-ring finnish/swedish/danish/norwegian
-(map-font-character-to-file 
- (string (integer->char 197))
- (string-append default-font-directory "@PATHSEP@" 
-		"A-ring.sym"))
-
-; AE-diphtong danish/norwegian 
-(map-font-character-to-file 
- (string (integer->char 198))
- (string-append default-font-directory "@PATHSEP@" 
-		"AE-lig.sym"))
-
-; O-umlaut finnish/swedish/german
-(map-font-character-to-file 
- (string (integer->char 214))
- (string-append default-font-directory "@PATHSEP@" 
-		"O-diaeresis.sym"))
-
-; O-slash danish/norwegian
-(map-font-character-to-file 
- (string (integer->char 216))
- (string-append default-font-directory "@PATHSEP@" 
-		"O-slash.sym"))
-
-; U-umlaut german
-(map-font-character-to-file 
- (string (integer->char 220))
- (string-append default-font-directory "@PATHSEP@" 
-		"U-diaeresis.sym"))
-
-; a-umlaut finnish/swedish/german 
-(map-font-character-to-file 
- (string (integer->char 228))
- (string-append default-font-directory "@PATHSEP@" 
-		"a_-diaeresis.sym"))
-
-; a-ring finnish/swedish/danish/norwegian
-(map-font-character-to-file 
- (string (integer->char 229))
- (string-append default-font-directory "@PATHSEP@" 
-		"a_-ring.sym"))
-
-; ae-diphtong danish/norwegian 
-(map-font-character-to-file 
- (string (integer->char 230))
- (string-append default-font-directory "@PATHSEP@" 
-		"ae_-lig.sym"))
-
-; o-umlaut finnish/swedish/german 
-(map-font-character-to-file 
- (string (integer->char 246))
- (string-append default-font-directory "@PATHSEP@" 
-		"o_-diaeresis.sym"))
-
-; o-slash danish/norwegian 
-(map-font-character-to-file 
- (string (integer->char 248))
- (string-append default-font-directory "@PATHSEP@" 
-		"o_-slash.sym"))
-
-; u-umlaut german 
-(map-font-character-to-file 
- (string (integer->char 252))
- (string-append default-font-directory "@PATHSEP@" 
-		"u_-diaeresis.sym"))
-
-; a-acute_accent spanish 
-(map-font-character-to-file 
- (string (integer->char 225))
- (string-append default-font-directory "@PATHSEP@" 
-		"a_-acute-accent.sym"))
-
-; e-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 233))
- (string-append default-font-directory "@PATHSEP@" 
-		"e_-acute-accent.sym"))
-
-; i-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 237))
- (string-append default-font-directory "@PATHSEP@" 
-		"i_-acute-accent.sym"))
-
-; o-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 243))
- (string-append default-font-directory "@PATHSEP@" 
-		"o_-acute-accent.sym"))
-
-; u-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 250))
- (string-append default-font-directory "@PATHSEP@" 
-		"u_-acute-accent.sym"))
-
-; A-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 193))
- (string-append default-font-directory "@PATHSEP@" 
-		"A-acute-accent.sym"))
-
-; E-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 201))
- (string-append default-font-directory "@PATHSEP@" 
-		"E-acute-accent.sym"))
-
-; I-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 205))
- (string-append default-font-directory "@PATHSEP@" 
-		"I-acute-accent.sym"))
-
-; O-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 211))
- (string-append default-font-directory "@PATHSEP@" 
-		"O-acute-accent.sym"))
-
-; U-acute_accent spanish
-(map-font-character-to-file 
- (string (integer->char 218))
- (string-append default-font-directory "@PATHSEP@" 
-		"U-acute-accent.sym"))
-
-; n-tilde spanish
-(map-font-character-to-file 
- (string (integer->char 241))
- (string-append default-font-directory "@PATHSEP@" 
-		"n_-tilde.sym"))
-
-; N-tilde spanish
-(map-font-character-to-file 
- (string (integer->char 209))
- (string-append default-font-directory "@PATHSEP@" 
-		"N-tilde.sym"))
-
-; open exclamation spanish 
-(map-font-character-to-file 
- (string (integer->char 161))
- (string-append default-font-directory "@PATHSEP@" 
-		"excl-open.sym"))
-
-; open question spanish
-(map-font-character-to-file 
- (string (integer->char 191))
- (string-append default-font-directory "@PATHSEP@" 
-		"quest-open.sym"))
+(let ((dir (string-append default-font-directory "@PATHSEP@")))
+  (for-each
+   (lambda (c)
+     (map-font-character-to-file (car c) (string-append dir (cdr c))))
+   '(
+     ;; A-umlaut finnish/swedish/german 
+     ("Ä" . "A-diaeresis.sym")
+     ;; A-ring finnish/swedish/danish/norwegian
+     ("Å" . "A-ring.sym")
+     ;; AE-diphtong danish/norwegian 
+     ("Æ" . "AE-lig.sym")
+     ;; O-umlaut finnish/swedish/german
+     ("Ö" . "O-diaeresis.sym")
+     ;; O-slash danish/norwegian
+     ("Ø" . "O-slash.sym")
+     ;; U-umlaut german
+     ("Ü" . "U-diaeresis.sym")
+     ;; a-umlaut finnish/swedish/german 
+     ("ä" . "a_-diaeresis.sym")
+     ;; a-ring finnish/swedish/danish/norwegian
+     ("å" . "a_-ring.sym")
+     ;; ae-diphtong danish/norwegian 
+     ("æ" . "ae_-lig.sym")
+     ;; o-umlaut finnish/swedish/german 
+     ("ö" . "o_-diaeresis.sym")
+     ;; o-slash danish/norwegian 
+     ("ø" . "o_-slash.sym")
+     ;; u-umlaut german 
+     ("ü" . "u_-diaeresis.sym")
+     ;; a-acute_accent spanish 
+     ("á" . "a_-acute-accent.sym")
+     ;; e-acute_accent spanish
+     ("é" . "e_-acute-accent.sym")
+     ;; i-acute_accent spanish
+     ("í" . "i_-acute-accent.sym")
+     ;; o-acute_accent spanish
+     ("ó" . "o_-acute-accent.sym")
+     ;; u-acute_accent spanish
+     ("ú" . "u_-acute-accent.sym")
+     ;; A-acute_accent spanish
+     ("Á" . "A-acute-accent.sym")
+     ;; E-acute_accent spanish
+     ("É" . "E-acute-accent.sym")
+     ;; I-acute_accent spanish
+     ("Í" . "I-acute-accent.sym")
+     ;; O-acute_accent spanish
+     ("Ó" . "O-acute-accent.sym")
+     ;; U-acute_accent spanish
+     ("Ú" . "U-acute-accent.sym")
+     ;; n-tilde spanish
+     ("ñ" . "n_-tilde.sym")
+     ;; N-tilde spanish
+     ("Ñ" . "N-tilde.sym")
+     ;; open exclamation spanish 
+     ("¡" . "excl-open.sym")
+     ;; open question spanish
+     ("¿" . "quest-open.sym"))))
 
 ;
 ; End of font related keywords
