emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ergoemacs-mode 5a1ec10 111/325: Fix some warnings


From: Stefan Monnier
Subject: [elpa] externals/ergoemacs-mode 5a1ec10 111/325: Fix some warnings
Date: Sat, 23 Oct 2021 18:48:33 -0400 (EDT)

branch: externals/ergoemacs-mode
commit 5a1ec1008ad194b59e676e4d8cae258c798969b3
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>

    Fix some warnings
---
 ergoemacs-lib.el       | 2 +-
 ergoemacs-translate.el | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/ergoemacs-lib.el b/ergoemacs-lib.el
index 1c585d9..e48f902 100644
--- a/ergoemacs-lib.el
+++ b/ergoemacs-lib.el
@@ -523,7 +523,7 @@ The reset is done with `ergoemacs-mode-reset'."
       (setq file-temp (expand-file-name "ergoemacs.ini" extra-dir))
       (with-temp-file file-temp
         (set-buffer-file-coding-system 'utf-8)
-        (insert (ergoemacs-translate--ahk-ini all all)))
+        (insert (ergoemacs-translate--ahk-ini all)))
       (setq file-temp (expand-file-name "ergoemacs.ahk" extra-dir))
       (with-temp-file file-temp
         (set-buffer-file-coding-system 'utf-8)
diff --git a/ergoemacs-translate.el b/ergoemacs-translate.el
index 6019f90..71b682d 100644
--- a/ergoemacs-translate.el
+++ b/ergoemacs-translate.el
@@ -1076,14 +1076,13 @@ If there are no gui elements, retun nil."
           (setq ret (format "%s\n%s=%s" ret f (ergoemacs-translate--ahk-code 
key))))))
     ret))
 
-(defun ergoemacs-translate--ahk-ini (&optional all-layouts all-themes)
+(defun ergoemacs-translate--ahk-ini (&optional all-layouts)
   "Creates the ini file used with the autohotkey script."
   (let ((layouts (or (and all-layouts (sort (ergoemacs-layouts--list) 
'string<))
                      (and (eq (ergoemacs :layout) 'ergoemacs-layout-us) (list 
"us"))
                      (list "us" ergoemacs-keyboard-layout)))
         (themes (list "standard"))
         (original-layout ergoemacs-keyboard-layout)
-        (original-theme ergoemacs-theme)
         ret)
     (unwind-protect
         (setq ret (with-temp-buffer



reply via email to

[Prev in Thread] Current Thread [Next in Thread]