Skip to content

Commit 8d06f64

Browse files
committed
Define customizable variables using defcustom
1 parent 222ae3f commit 8d06f64

3 files changed

Lines changed: 15 additions & 9 deletions

File tree

pacfiles-buttons.el

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,7 @@
88
(require 'tramp)
99

1010
(defgroup pacfiles-button-faces nil
11-
"Faces for the buttons used in pacfiles-mode."
11+
"Faces of the buttons used in pacfiles-mode."
1212
:group 'pacfiles)
1313

1414
(defface pacfiles--apply-all
@@ -57,8 +57,10 @@
5757
'follow-link t)
5858

5959

60-
(defvar pacfiles-activate-no-confirm nil
61-
"Do not ask for user input when applying or discarding a merged file.")
60+
(defcustom pacfiles-activate-no-confirm nil
61+
"Do not ask for user input when applying or discarding a merged file."
62+
:type '(boolean)
63+
:group 'pacfiles)
6264

6365
(defvar pacfiles--inhibit-button-revert nil
6466
"Clicking a button does not revert the pacfiles list buffer.")

pacfiles-mode.el

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -5,8 +5,8 @@
55
;; Author: Carlos G. Cordero <http://github/UndeadKernel>
66
;; Maintainer: Carlos G. Cordero <pacfiles@binarycharly.com>
77
;; Created: Oct 11, 2018
8-
;; Modified: Apr 18, 2020
9-
;; Version: 1.0
8+
;; Modified: Sep 15, 2020
9+
;; Version: 1.1
1010
;; Keywords: files pacman arch pacnew pacsave update linux
1111
;; URL: https://github.com/UndeadKernel/pacfiles-mode
1212
;; Package-Requires: ((emacs "26") (cl-lib "0.5"))
@@ -38,9 +38,11 @@
3838
(defgroup pacfiles nil "Options that relate to ‘pacfiles-mode’."
3939
:group 'applications)
4040

41-
(defvar pacfiles-updates-search-command
41+
(defcustom pacfiles-updates-search-command
4242
"find /etc -name '*.pacnew' -o -name '*.pacsave' 2>/dev/null"
43-
"Command to find .pacnew files.")
43+
"Command to find .pacnew files."
44+
:type '(string)
45+
:group 'pacfiles)
4446

4547
(defvar pacfiles--merge-search-command
4648
(concat "find " (shell-quote-argument pacfiles-merge-file-tmp-location) " -name '*.pacmerge' 2>/dev/null")

pacfiles-win.el

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -11,8 +11,10 @@
1111
(defvar pacfiles--files-buffer-name "*pacfiles:file-list*"
1212
"Name of the window that holds the list of pacman files.")
1313

14-
(defvar pacfiles-merge-file-tmp-location "/tmp/"
15-
"Location of temporary merged filed.")
14+
(defcustom pacfiles-merge-file-tmp-location "/tmp/"
15+
"Location of temporary merged filed."
16+
:type '(string)
17+
:group 'pacfiles)
1618

1719
(defvar pacfiles--previous-window-confs '()
1820
"The window configuration before `pacfiles' is called.")

0 commit comments

Comments
 (0)