aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMiguel Ángel Moreno <mail@migalmoreno.com>2023-03-15 11:16:08 +0100
committerMiguel Ángel Moreno <mail@migalmoreno.com>2023-03-15 11:32:20 +0100
commit9a8574558924daaf8f8ae433ec14bd8afff7a3a4 (patch)
treee9fba85e2935ff461870d17ddc5a504235580343
parentb5747ac77fa2c66b3d4137977272cd9753f2c1a3 (diff)
feat: Rename global packages variable
-rw-r--r--fdroid.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/fdroid.el b/fdroid.el
index 9f70b61..51e475d 100644
--- a/fdroid.el
+++ b/fdroid.el
@@ -50,7 +50,7 @@
:group 'fdroid
:type 'boolean)
-(defvar fdroid--packages nil
+(defvar fdroid-packages nil
"The list of cached packages from the current F-Droid repository.")
(defvar fdroid-map nil
@@ -107,7 +107,7 @@ Then, run BODY in the context of the result, and show MESSAGE after completion."
Optionally, filter packages by KEYWORDS and return a list of matching results."
(let ((command (if keywords (list "search" keywords) (list "search")))
(results (make-hash-table :test 'equal)))
- (or fdroid--packages
+ (or fdroid-packages
(with-temp-buffer
(apply #'call-process fdroid-program nil t nil command)
(goto-char (point-min))
@@ -124,7 +124,7 @@ Optionally, filter packages by KEYWORDS and return a list of matching results."
:description (match-string 4))
results))
(forward-line 1))
- (setf fdroid--packages results)))))
+ (setq fdroid-packages results)))))
(defun fdroid--format-package (key value table)
"Embellish package entry with KEY and VALUE from TABLE for user completion."
@@ -179,10 +179,10 @@ If specified, prompt the user for MULTIPLE package selection."
(defun fdroid-update ()
"Clear and update current F-Droid repository package index."
(interactive)
- (setf fdroid--packages nil)
(fdroid-with--fdroidcl
(list "update")
"Repositories updated"))
+ (setq fdroid-packages nil)
;;;###autoload
(defun fdroid-search (keywords)