diff options
| author | Dave Love | 2002-10-06 16:12:56 +0000 |
|---|---|---|
| committer | Dave Love | 2002-10-06 16:12:56 +0000 |
| commit | 0584a38f863ded25911ec9fc3e87e76cb10675ad (patch) | |
| tree | a8a4dec340d673024b11a41cb574700735ef9e8c | |
| parent | 2e801687ecd8ac6564b35738fbf6e35a77a8825c (diff) | |
| download | emacs-0584a38f863ded25911ec9fc3e87e76cb10675ad.tar.gz emacs-0584a38f863ded25911ec9fc3e87e76cb10675ad.zip | |
Don't require latin-1.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/international/swedish.el | 6 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3ad80f5f6a1..5c33b0640e5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2002-10-06 Dave Love <fx@gnu.org> | ||
| 2 | |||
| 3 | * international/swedish.el: Don't require latin-1. | ||
| 4 | |||
| 1 | 2002-10-05 Dave Love <fx@gnu.org> | 5 | 2002-10-05 Dave Love <fx@gnu.org> |
| 2 | 6 | ||
| 3 | * language/czech.el ("Czech"): | 7 | * language/czech.el ("Czech"): |
diff --git a/lisp/international/swedish.el b/lisp/international/swedish.el index 05229b2e9e5..c636529362f 100644 --- a/lisp/international/swedish.el +++ b/lisp/international/swedish.el | |||
| @@ -27,12 +27,14 @@ | |||
| 27 | 27 | ||
| 28 | ;;; Code: | 28 | ;;; Code: |
| 29 | 29 | ||
| 30 | ;; Fixme: Is this actually used? if so, it should be in language, | ||
| 31 | ;; possibly as a feature property of Swedish, probably defining a | ||
| 32 | ;; `swascii' coding system. | ||
| 33 | |||
| 30 | ;; Written by Howard Gayle. See case-table.el for details. | 34 | ;; Written by Howard Gayle. See case-table.el for details. |
| 31 | 35 | ||
| 32 | ;; See iso-swed.el for a description of the character set. | 36 | ;; See iso-swed.el for a description of the character set. |
| 33 | 37 | ||
| 34 | (require 'latin-1) | ||
| 35 | |||
| 36 | (defvar swedish-re | 38 | (defvar swedish-re |
| 37 | "[ \t\n]\\(och\\|att\\|en\\|{r\\|\\[R\\|p}\\|P\\]\\|som\\|det\\|av\\|den\\|f|r\\|F\\\\R\\)[ \t\n.,?!:;'\")}]" | 39 | "[ \t\n]\\(och\\|att\\|en\\|{r\\|\\[R\\|p}\\|P\\]\\|som\\|det\\|av\\|den\\|f|r\\|F\\\\R\\)[ \t\n.,?!:;'\")}]" |
| 38 | "Regular expression for common Swedish words.") | 40 | "Regular expression for common Swedish words.") |