Mercurial > emacs
annotate lisp/international/iso-insert.el @ 12895:4dbac3df0ec7
(basic-save-buffer): Confirm for overwriting old file
when a file name is specified.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 19 Aug 1995 17:01:27 +0000 |
parents | cc7cd83ccf3f |
children | 83f275dcd93a |
rev | line source |
---|---|
660
08eb386dd0f3
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
583
diff
changeset
|
1 ;;; iso-insert.el --- insert functions for ISO 8859/1. |
08eb386dd0f3
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
583
diff
changeset
|
2 |
7300 | 3 ;; Copyright (C) 1987, 1994 Free Software Foundation, Inc. |
845 | 4 |
807
4f28bd14272c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
660
diff
changeset
|
5 ;; Author: Howard Gayle |
4f28bd14272c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
660
diff
changeset
|
6 ;; Maintainer: FSF |
3012
d4b85bbedee8
Change "i14n" keyword to "i18n".
Jim Blandy <jimb@redhat.com>
parents:
2307
diff
changeset
|
7 ;; Keywords: i18n |
583 | 8 |
9 ;; This file is part of GNU Emacs. | |
10 | |
11 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
12 ;; it under the terms of the GNU General Public License as published by | |
807
4f28bd14272c
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
660
diff
changeset
|
13 ;; the Free Software Foundation; either version 2, or (at your option) |
583 | 14 ;; any later version. |
15 | |
16 ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 ;; GNU General Public License for more details. | |
20 | |
21 ;; You should have received a copy of the GNU General Public License | |
22 ;; along with GNU Emacs; see the file COPYING. If not, write to | |
23 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | |
24 | |
2307
10e417efb12a
Added or corrected Commentary sections
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
845
diff
changeset
|
25 ;;; Commentary: |
583 | 26 |
27 ;; Written by Howard Gayle. See case-table.el for details. | |
28 | |
2307
10e417efb12a
Added or corrected Commentary sections
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
845
diff
changeset
|
29 ;;; Code: |
10e417efb12a
Added or corrected Commentary sections
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
845
diff
changeset
|
30 |
583 | 31 (defun insert-no-break-space () |
32 (interactive "*") | |
33 (insert 160) | |
34 ) | |
35 | |
36 (defun insert-inverted-exclamation-mark () | |
37 (interactive "*") | |
38 (insert 161) | |
39 ) | |
40 | |
41 (defun insert-cent-sign () | |
42 (interactive "*") | |
43 (insert 162) | |
44 ) | |
45 | |
46 (defun insert-pound-sign () | |
47 (interactive "*") | |
48 (insert 163) | |
49 ) | |
50 | |
51 (defun insert-general-currency-sign () | |
52 (interactive "*") | |
53 (insert 164) | |
54 ) | |
55 | |
56 (defun insert-yen-sign () | |
57 (interactive "*") | |
58 (insert 165) | |
59 ) | |
60 | |
61 (defun insert-broken-vertical-line () | |
62 (interactive "*") | |
63 (insert 166) | |
64 ) | |
65 | |
66 (defun insert-section-sign () | |
67 (interactive "*") | |
68 (insert 167) | |
69 ) | |
70 | |
71 (defun insert-diaeresis () | |
72 (interactive "*") | |
73 (insert 168) | |
74 ) | |
75 | |
76 (defun insert-copyright-sign () | |
77 (interactive "*") | |
78 (insert 169) | |
79 ) | |
80 | |
81 (defun insert-ordinal-indicator-feminine () | |
82 (interactive "*") | |
83 (insert 170) | |
84 ) | |
85 | |
86 (defun insert-angle-quotation-mark-left () | |
87 (interactive "*") | |
88 (insert 171) | |
89 ) | |
90 | |
91 (defun insert-not-sign () | |
92 (interactive "*") | |
93 (insert 172) | |
94 ) | |
95 | |
96 (defun insert-soft-hyphen () | |
97 (interactive "*") | |
98 (insert 173) | |
99 ) | |
100 | |
101 (defun insert-registered-sign () | |
102 (interactive "*") | |
103 (insert 174) | |
104 ) | |
105 | |
106 (defun insert-macron () | |
107 (interactive "*") | |
108 (insert 175) | |
109 ) | |
110 | |
111 (defun insert-degree-sign () | |
112 (interactive "*") | |
113 (insert 176) | |
114 ) | |
115 | |
116 (defun insert-plus-or-minus-sign () | |
117 (interactive "*") | |
118 (insert 177) | |
119 ) | |
120 | |
121 (defun insert-superscript-two () | |
122 (interactive "*") | |
123 (insert 178) | |
124 ) | |
125 | |
126 (defun insert-superscript-three () | |
127 (interactive "*") | |
128 (insert 179) | |
129 ) | |
130 | |
131 (defun insert-acute-accent () | |
132 (interactive "*") | |
133 (insert 180) | |
134 ) | |
135 | |
136 (defun insert-micro-sign () | |
137 (interactive "*") | |
138 (insert 181) | |
139 ) | |
140 | |
141 (defun insert-pilcrow () | |
142 (interactive "*") | |
143 (insert 182) | |
144 ) | |
145 | |
146 (defun insert-middle-dot () | |
147 (interactive "*") | |
148 (insert 183) | |
149 ) | |
150 | |
151 (defun insert-cedilla () | |
152 (interactive "*") | |
153 (insert 184) | |
154 ) | |
155 | |
156 (defun insert-superscript-one () | |
157 (interactive "*") | |
158 (insert 185) | |
159 ) | |
160 | |
161 (defun insert-ordinal-indicator-masculine () | |
162 (interactive "*") | |
163 (insert 186) | |
164 ) | |
165 | |
166 (defun insert-angle-quotation-mark-right () | |
167 (interactive "*") | |
168 (insert 187) | |
169 ) | |
170 | |
171 (defun insert-fraction-one-quarter () | |
172 (interactive "*") | |
173 (insert 188) | |
174 ) | |
175 | |
176 (defun insert-fraction-one-half () | |
177 (interactive "*") | |
178 (insert 189) | |
179 ) | |
180 | |
181 (defun insert-fraction-three-quarters () | |
182 (interactive "*") | |
183 (insert 190) | |
184 ) | |
185 | |
186 (defun insert-inverted-question-mark () | |
187 (interactive "*") | |
188 (insert 191) | |
189 ) | |
190 | |
191 (defun insert-A-grave () | |
192 (interactive "*") | |
193 (insert 192) | |
194 ) | |
195 | |
196 (defun insert-A-acute () | |
197 (interactive "*") | |
198 (insert 193) | |
199 ) | |
200 | |
201 (defun insert-A-circumflex () | |
202 (interactive "*") | |
203 (insert 194) | |
204 ) | |
205 | |
206 (defun insert-A-tilde () | |
207 (interactive "*") | |
208 (insert 195) | |
209 ) | |
210 | |
211 (defun insert-A-umlaut () | |
212 (interactive "*") | |
213 (insert 196) | |
214 ) | |
215 | |
216 (defun insert-A-ring () | |
217 (interactive "*") | |
218 (insert 197) | |
219 ) | |
220 | |
221 (defun insert-AE () | |
222 (interactive "*") | |
223 (insert 198) | |
224 ) | |
225 | |
226 (defun insert-C-cedilla () | |
227 (interactive "*") | |
228 (insert 199) | |
229 ) | |
230 | |
231 (defun insert-E-grave () | |
232 (interactive "*") | |
233 (insert 200) | |
234 ) | |
235 | |
236 (defun insert-E-acute () | |
237 (interactive "*") | |
238 (insert 201) | |
239 ) | |
240 | |
241 (defun insert-E-circumflex () | |
242 (interactive "*") | |
243 (insert 202) | |
244 ) | |
245 | |
246 (defun insert-E-umlaut () | |
247 (interactive "*") | |
248 (insert 203) | |
249 ) | |
250 | |
251 (defun insert-I-grave () | |
252 (interactive "*") | |
253 (insert 204) | |
254 ) | |
255 | |
256 (defun insert-I-acute () | |
257 (interactive "*") | |
258 (insert 205) | |
259 ) | |
260 | |
261 (defun insert-I-circumflex () | |
262 (interactive "*") | |
263 (insert 206) | |
264 ) | |
265 | |
266 (defun insert-I-umlaut () | |
267 (interactive "*") | |
268 (insert 207) | |
269 ) | |
270 | |
271 (defun insert-D-stroke () | |
272 (interactive "*") | |
273 (insert 208) | |
274 ) | |
275 | |
276 (defun insert-N-tilde () | |
277 (interactive "*") | |
278 (insert 209) | |
279 ) | |
280 | |
281 (defun insert-O-grave () | |
282 (interactive "*") | |
283 (insert 210) | |
284 ) | |
285 | |
286 (defun insert-O-acute () | |
287 (interactive "*") | |
288 (insert 211) | |
289 ) | |
290 | |
291 (defun insert-O-circumflex () | |
292 (interactive "*") | |
293 (insert 212) | |
294 ) | |
295 | |
296 (defun insert-O-tilde () | |
297 (interactive "*") | |
298 (insert 213) | |
299 ) | |
300 | |
301 (defun insert-O-umlaut () | |
302 (interactive "*") | |
303 (insert 214) | |
304 ) | |
305 | |
306 (defun insert-multiplication-sign () | |
307 (interactive "*") | |
308 (insert 215) | |
309 ) | |
310 | |
311 (defun insert-O-slash () | |
312 (interactive "*") | |
313 (insert 216) | |
314 ) | |
315 | |
316 (defun insert-U-grave () | |
317 (interactive "*") | |
318 (insert 217) | |
319 ) | |
320 | |
321 (defun insert-U-acute () | |
322 (interactive "*") | |
323 (insert 218) | |
324 ) | |
325 | |
326 (defun insert-U-circumflex () | |
327 (interactive "*") | |
328 (insert 219) | |
329 ) | |
330 | |
331 (defun insert-U-umlaut () | |
332 (interactive "*") | |
333 (insert 220) | |
334 ) | |
335 | |
336 (defun insert-Y-acute () | |
337 (interactive "*") | |
338 (insert 221) | |
339 ) | |
340 | |
341 (defun insert-THORN () | |
342 (interactive "*") | |
343 (insert 222) | |
344 ) | |
345 | |
346 (defun insert-ss () | |
347 (interactive "*") | |
348 (insert 223) | |
349 ) | |
350 | |
351 (defun insert-a-grave () | |
352 (interactive "*") | |
353 (insert 224) | |
354 ) | |
355 | |
356 (defun insert-a-acute () | |
357 (interactive "*") | |
358 (insert 225) | |
359 ) | |
360 | |
361 (defun insert-a-circumflex () | |
362 (interactive "*") | |
363 (insert 226) | |
364 ) | |
365 | |
366 (defun insert-a-tilde () | |
367 (interactive "*") | |
368 (insert 227) | |
369 ) | |
370 | |
371 (defun insert-a-umlaut () | |
372 (interactive "*") | |
373 (insert 228) | |
374 ) | |
375 | |
376 (defun insert-a-ring () | |
377 (interactive "*") | |
378 (insert 229) | |
379 ) | |
380 | |
381 (defun insert-ae () | |
382 (interactive "*") | |
383 (insert 230) | |
384 ) | |
385 | |
386 (defun insert-c-cedilla () | |
387 (interactive "*") | |
388 (insert 231) | |
389 ) | |
390 | |
391 (defun insert-e-grave () | |
392 (interactive "*") | |
393 (insert 232) | |
394 ) | |
395 | |
396 (defun insert-e-acute () | |
397 (interactive "*") | |
398 (insert 233) | |
399 ) | |
400 | |
401 (defun insert-e-circumflex () | |
402 (interactive "*") | |
403 (insert 234) | |
404 ) | |
405 | |
406 (defun insert-e-umlaut () | |
407 (interactive "*") | |
408 (insert 235) | |
409 ) | |
410 | |
411 (defun insert-i-grave () | |
412 (interactive "*") | |
413 (insert 236) | |
414 ) | |
415 | |
416 (defun insert-i-acute () | |
417 (interactive "*") | |
418 (insert 237) | |
419 ) | |
420 | |
421 (defun insert-i-circumflex () | |
422 (interactive "*") | |
423 (insert 238) | |
424 ) | |
425 | |
426 (defun insert-i-umlaut () | |
427 (interactive "*") | |
428 (insert 239) | |
429 ) | |
430 | |
431 (defun insert-d-stroke () | |
432 (interactive "*") | |
433 (insert 240) | |
434 ) | |
435 | |
436 (defun insert-n-tilde () | |
437 (interactive "*") | |
438 (insert 241) | |
439 ) | |
440 | |
441 (defun insert-o-grave () | |
442 (interactive "*") | |
443 (insert 242) | |
444 ) | |
445 | |
446 (defun insert-o-acute () | |
447 (interactive "*") | |
448 (insert 243) | |
449 ) | |
450 | |
451 (defun insert-o-circumflex () | |
452 (interactive "*") | |
453 (insert 244) | |
454 ) | |
455 | |
456 (defun insert-o-tilde () | |
457 (interactive "*") | |
458 (insert 245) | |
459 ) | |
460 | |
461 (defun insert-o-umlaut () | |
462 (interactive "*") | |
463 (insert 246) | |
464 ) | |
465 | |
466 (defun insert-division-sign () | |
467 (interactive "*") | |
468 (insert 247) | |
469 ) | |
470 | |
471 (defun insert-o-slash () | |
472 (interactive "*") | |
473 (insert 248) | |
474 ) | |
475 | |
476 (defun insert-u-grave () | |
477 (interactive "*") | |
478 (insert 249) | |
479 ) | |
480 | |
481 (defun insert-u-acute () | |
482 (interactive "*") | |
483 (insert 250) | |
484 ) | |
485 | |
486 (defun insert-u-circumflex () | |
487 (interactive "*") | |
488 (insert 251) | |
489 ) | |
490 | |
491 (defun insert-u-umlaut () | |
492 (interactive "*") | |
493 (insert 252) | |
494 ) | |
495 | |
496 (defun insert-y-acute () | |
497 (interactive "*") | |
498 (insert 253) | |
499 ) | |
500 | |
501 (defun insert-thorn () | |
502 (interactive "*") | |
503 (insert 254) | |
504 ) | |
505 | |
506 (defun insert-y-umlaut () | |
507 (interactive "*") | |
508 (insert 255) | |
509 ) | |
510 | |
511 (defvar 8859-1-map nil "Keymap for ISO 8859/1 character insertion.") | |
512 (if 8859-1-map nil | |
513 (setq 8859-1-map (make-keymap)) | |
514 (define-key 8859-1-map " " 'insert-no-break-space) | |
515 (define-key 8859-1-map "!" 'insert-inverted-exclamation-mark) | |
516 (define-key 8859-1-map "\"" (make-sparse-keymap)) | |
517 (define-key 8859-1-map "\"\"" 'insert-diaeresis) | |
518 (define-key 8859-1-map "\"A" 'insert-A-umlaut) | |
519 (define-key 8859-1-map "\"E" 'insert-E-umlaut) | |
520 (define-key 8859-1-map "\"I" 'insert-I-umlaut) | |
521 (define-key 8859-1-map "\"O" 'insert-O-umlaut) | |
522 (define-key 8859-1-map "\"U" 'insert-U-umlaut) | |
523 (define-key 8859-1-map "\"a" 'insert-a-umlaut) | |
524 (define-key 8859-1-map "\"e" 'insert-e-umlaut) | |
525 (define-key 8859-1-map "\"i" 'insert-i-umlaut) | |
526 (define-key 8859-1-map "\"o" 'insert-o-umlaut) | |
527 (define-key 8859-1-map "\"u" 'insert-u-umlaut) | |
528 (define-key 8859-1-map "\"y" 'insert-y-umlaut) | |
529 (define-key 8859-1-map "'" (make-sparse-keymap)) | |
530 (define-key 8859-1-map "''" 'insert-acute-accent) | |
531 (define-key 8859-1-map "'A" 'insert-A-acute) | |
532 (define-key 8859-1-map "'E" 'insert-E-acute) | |
533 (define-key 8859-1-map "'I" 'insert-I-acute) | |
534 (define-key 8859-1-map "'O" 'insert-O-acute) | |
535 (define-key 8859-1-map "'U" 'insert-U-acute) | |
536 (define-key 8859-1-map "'Y" 'insert-Y-acute) | |
537 (define-key 8859-1-map "'a" 'insert-a-acute) | |
538 (define-key 8859-1-map "'e" 'insert-e-acute) | |
539 (define-key 8859-1-map "'i" 'insert-i-acute) | |
540 (define-key 8859-1-map "'o" 'insert-o-acute) | |
541 (define-key 8859-1-map "'u" 'insert-u-acute) | |
542 (define-key 8859-1-map "'y" 'insert-y-acute) | |
543 (define-key 8859-1-map "$" 'insert-general-currency-sign) | |
544 (define-key 8859-1-map "+" 'insert-plus-or-minus-sign) | |
545 (define-key 8859-1-map "," (make-sparse-keymap)) | |
546 (define-key 8859-1-map ",," 'insert-cedilla) | |
547 (define-key 8859-1-map ",C" 'insert-C-cedilla) | |
548 (define-key 8859-1-map ",c" 'insert-c-cedilla) | |
549 (define-key 8859-1-map "-" 'insert-soft-hyphen) | |
550 (define-key 8859-1-map "." 'insert-middle-dot) | |
551 (define-key 8859-1-map "/" (make-sparse-keymap)) | |
552 (define-key 8859-1-map "//" 'insert-division-sign) | |
553 (define-key 8859-1-map "/O" 'insert-O-slash) | |
554 (define-key 8859-1-map "/o" 'insert-o-slash) | |
555 (define-key 8859-1-map "1" (make-sparse-keymap)) | |
556 (define-key 8859-1-map "1/" (make-sparse-keymap)) | |
557 (define-key 8859-1-map "1/2" 'insert-fraction-one-half) | |
558 (define-key 8859-1-map "1/4" 'insert-fraction-one-quarter) | |
559 (define-key 8859-1-map "3" (make-sparse-keymap)) | |
560 (define-key 8859-1-map "3/" (make-sparse-keymap)) | |
561 (define-key 8859-1-map "3/4" 'insert-fraction-three-quarters) | |
562 (define-key 8859-1-map "<" 'insert-angle-quotation-mark-left) | |
563 (define-key 8859-1-map "=" 'insert-macron) | |
564 (define-key 8859-1-map ">" 'insert-angle-quotation-mark-right) | |
565 (define-key 8859-1-map "?" 'insert-inverted-question-mark) | |
5823
d39903c0763e
Change the sequences aa and ae to just a and e.
Richard M. Stallman <rms@gnu.org>
parents:
3177
diff
changeset
|
566 (define-key 8859-1-map "A" 'insert-A-ring) |
d39903c0763e
Change the sequences aa and ae to just a and e.
Richard M. Stallman <rms@gnu.org>
parents:
3177
diff
changeset
|
567 (define-key 8859-1-map "E" 'insert-AE) |
583 | 568 (define-key 8859-1-map "C" 'insert-copyright-sign) |
569 (define-key 8859-1-map "D" 'insert-D-stroke) | |
570 (define-key 8859-1-map "L" 'insert-pound-sign) | |
571 (define-key 8859-1-map "P" 'insert-pilcrow) | |
572 (define-key 8859-1-map "R" 'insert-registered-sign) | |
573 (define-key 8859-1-map "S" 'insert-section-sign) | |
574 (define-key 8859-1-map "T" 'insert-THORN) | |
575 (define-key 8859-1-map "Y" 'insert-yen-sign) | |
576 (define-key 8859-1-map "^" (make-sparse-keymap)) | |
577 (define-key 8859-1-map "^1" 'insert-superscript-one) | |
578 (define-key 8859-1-map "^2" 'insert-superscript-two) | |
579 (define-key 8859-1-map "^3" 'insert-superscript-three) | |
580 (define-key 8859-1-map "^A" 'insert-A-circumflex) | |
581 (define-key 8859-1-map "^E" 'insert-E-circumflex) | |
582 (define-key 8859-1-map "^I" 'insert-I-circumflex) | |
583 (define-key 8859-1-map "^O" 'insert-O-circumflex) | |
584 (define-key 8859-1-map "^U" 'insert-U-circumflex) | |
585 (define-key 8859-1-map "^a" 'insert-a-circumflex) | |
586 (define-key 8859-1-map "^e" 'insert-e-circumflex) | |
587 (define-key 8859-1-map "^i" 'insert-i-circumflex) | |
588 (define-key 8859-1-map "^o" 'insert-o-circumflex) | |
589 (define-key 8859-1-map "^u" 'insert-u-circumflex) | |
590 (define-key 8859-1-map "_" (make-sparse-keymap)) | |
591 (define-key 8859-1-map "_a" 'insert-ordinal-indicator-feminine) | |
592 (define-key 8859-1-map "_o" 'insert-ordinal-indicator-masculine) | |
593 (define-key 8859-1-map "`" (make-sparse-keymap)) | |
594 (define-key 8859-1-map "`A" 'insert-A-grave) | |
595 (define-key 8859-1-map "`E" 'insert-E-grave) | |
596 (define-key 8859-1-map "`I" 'insert-I-grave) | |
597 (define-key 8859-1-map "`O" 'insert-O-grave) | |
598 (define-key 8859-1-map "`U" 'insert-U-grave) | |
599 (define-key 8859-1-map "`a" 'insert-a-grave) | |
600 (define-key 8859-1-map "`e" 'insert-e-grave) | |
601 (define-key 8859-1-map "`i" 'insert-i-grave) | |
602 (define-key 8859-1-map "`o" 'insert-o-grave) | |
603 (define-key 8859-1-map "`u" 'insert-u-grave) | |
5823
d39903c0763e
Change the sequences aa and ae to just a and e.
Richard M. Stallman <rms@gnu.org>
parents:
3177
diff
changeset
|
604 (define-key 8859-1-map "a" 'insert-a-ring) |
d39903c0763e
Change the sequences aa and ae to just a and e.
Richard M. Stallman <rms@gnu.org>
parents:
3177
diff
changeset
|
605 (define-key 8859-1-map "e" 'insert-ae) |
583 | 606 (define-key 8859-1-map "c" 'insert-cent-sign) |
607 (define-key 8859-1-map "d" 'insert-d-stroke) | |
608 (define-key 8859-1-map "o" 'insert-degree-sign) | |
609 (define-key 8859-1-map "s" 'insert-ss) | |
610 (define-key 8859-1-map "t" 'insert-thorn) | |
611 (define-key 8859-1-map "u" 'insert-micro-sign) | |
612 (define-key 8859-1-map "x" 'insert-multiplication-sign) | |
613 (define-key 8859-1-map "|" 'insert-broken-vertical-line) | |
614 (define-key 8859-1-map "~" (make-sparse-keymap)) | |
615 (define-key 8859-1-map "~A" 'insert-A-tilde) | |
616 (define-key 8859-1-map "~N" 'insert-N-tilde) | |
617 (define-key 8859-1-map "~O" 'insert-O-tilde) | |
618 (define-key 8859-1-map "~a" 'insert-a-tilde) | |
619 (define-key 8859-1-map "~n" 'insert-n-tilde) | |
620 (define-key 8859-1-map "~o" 'insert-o-tilde) | |
621 (define-key 8859-1-map "~~" 'insert-not-sign) | |
622 (if (not (lookup-key global-map "\C-x8")) | |
623 (define-key global-map "\C-x8" 8859-1-map)) | |
624 ) | |
625 | |
3177
2e1b9ebc17ef
Provide same name as file.
Richard M. Stallman <rms@gnu.org>
parents:
3012
diff
changeset
|
626 (provide 'iso-insert) |
660
08eb386dd0f3
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
583
diff
changeset
|
627 |
08eb386dd0f3
*** empty log message ***
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
583
diff
changeset
|
628 ;;; iso-insert.el ends here |