diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-05-30 04:17:38 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-05-30 04:17:38 +0000 |
| commit | e6f2dbf0e94d8ab6815789076d12339abdadb5e4 (patch) | |
| tree | aad8966a14ad3cb71e5e5bbeb3bb4ee1095172c4 /lisp/=iso8859-1.el | |
| parent | d04336b3d2cc062a5cbcbe42362b3ec37cab0d68 (diff) | |
| download | emacs-e6f2dbf0e94d8ab6815789076d12339abdadb5e4.tar.gz | |
Make RCS warnings stop.
Diffstat (limited to 'lisp/=iso8859-1.el')
| -rw-r--r-- | lisp/=iso8859-1.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/=iso8859-1.el b/lisp/=iso8859-1.el index 04a4e2bfcd3..34d0ac0d368 100644 --- a/lisp/=iso8859-1.el +++ b/lisp/=iso8859-1.el @@ -30,7 +30,7 @@ (require 'case-table) -(let ((table (standard-case-table))) +(let ((table (car (standard-case-table)))) (set-case-syntax 160 " " table) ; NBSP (no-break space) (set-case-syntax 161 "." table) ; inverted exclamation mark (set-case-syntax 162 "w" table) ; cent sign @@ -97,7 +97,7 @@ (set-case-syntax 223 "w" table) ; small sharp s, German (set-case-syntax 247 "_" table) ; division sign (set-case-syntax 255 "w" table) ; small y with diaeresis or umlaut mark - (set-standard-case-table (list (car table)))) + (set-standard-case-table (list table))) (provide 'iso8859-1) |