diff options
| author | Richard M. Stallman | 1996-12-16 01:39:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-12-16 01:39:18 +0000 |
| commit | cafef6ab6bc8cc8fd5f3374150a3c2e88845f9e4 (patch) | |
| tree | b8ff03e3bf2d64e2537fa9520d6f8ace4f115ac4 | |
| parent | ec5092d53cb3faaf8e0faee42ab165a1aba1f87d (diff) | |
| download | emacs-cafef6ab6bc8cc8fd5f3374150a3c2e88845f9e4.tar.gz emacs-cafef6ab6bc8cc8fd5f3374150a3c2e88845f9e4.zip | |
(register-name-alist): Use defvar.
| -rw-r--r-- | lisp/dos-fns.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el index 2d7ad746c77..00d4a36d0e1 100644 --- a/lisp/dos-fns.el +++ b/lisp/dos-fns.el | |||
| @@ -81,7 +81,7 @@ with a definition that really does change some file names." | |||
| 81 | (defvar msdos-shells '("command.com" "4dos.com" "ndos.com") | 81 | (defvar msdos-shells '("command.com" "4dos.com" "ndos.com") |
| 82 | "*List of shells that use `/c' instead of `-c' and a backslashed command.") | 82 | "*List of shells that use `/c' instead of `-c' and a backslashed command.") |
| 83 | 83 | ||
| 84 | (defconst register-name-alist | 84 | (defvar register-name-alist |
| 85 | '((ax . 0) (bx . 1) (cx . 2) (dx . 3) (si . 4) (di . 5) | 85 | '((ax . 0) (bx . 1) (cx . 2) (dx . 3) (si . 4) (di . 5) |
| 86 | (cflag . 6) (flags . 7) | 86 | (cflag . 6) (flags . 7) |
| 87 | (al . (0 . 0)) (bl . (1 . 0)) (cl . (2 . 0)) (dl . (3 . 0)) | 87 | (al . (0 . 0)) (bl . (1 . 0)) (cl . (2 . 0)) (dl . (3 . 0)) |