diff options
| author | hedy <hedy@tilde.cafe> | 2023-09-11 16:23:10 +0800 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2023-09-28 06:20:48 +0200 |
| commit | b06ee58fd68a93425723a1cc1b1841fc509108d6 (patch) | |
| tree | 337a64963a9b4a5358550cb736f7dca34ecf86ec | |
| parent | d25df039f8b0a6080bed7f6950d8946599d94b89 (diff) | |
char: Suppress reference to free variable warning
| -rw-r--r-- | cape-char.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cape-char.el b/cape-char.el index ee2cd65..b1fa877 100644 --- a/cape-char.el +++ b/cape-char.el @@ -58,7 +58,7 @@ retain the original string; otherwise they are stored as chars." (apply #'quail-use-package method (nthcdr 5 (assoc method input-method-alist))) (let ((hash (make-hash-table :test #'equal)) (decode-map (list 'dm))) - (quail-build-decode-map (list (nth 2 quail-current-package)) "" decode-map 0) + (quail-build-decode-map (list (quail-map)) "" decode-map 0) ;; Now decode-map contains: (dm (name . value) (name . value) ...) (dolist (cell (cdr decode-map)) (let ((name (car cell)) (value (cdr cell)) |