branch: master
commit 502eae693c973ee089960a379b809652d631759e
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
counsel.el (counsel--call): Rename to counsel--command
Fixes #1893
---
counsel.el | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/counsel.el b/counsel.el
index 7f16098..19e3062 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1350,7 +1350,9 @@ files in a project.")
(setq cmd counsel-git-grep-cmd-default)))
(cons proj cmd)))
-(defun counsel--call (&rest command)
+(define-obsolete-function-alias 'counsel--call 'counsel--command "0.11.0")
+
+(defun counsel--command (&rest command)
"Synchronously call COMMAND and return its output as a string.
COMMAND comprises the program name followed by its arguments, as
in `make-process'. Signal `file-error' and emit a warning if
@@ -4685,11 +4687,11 @@ selected color."
(defun counsel-rhythmbox-toggle-shuffle (_song)
"Toggle Rhythmbox shuffle setting."
- (let* ((old-order (counsel--call "dconf" "read"
"/org/gnome/rhythmbox/player/play-order"))
+ (let* ((old-order (counsel--command "dconf" "read"
"/org/gnome/rhythmbox/player/play-order"))
(new-order (if (string= old-order "'shuffle'")
"'linear'"
"'shuffle'")))
- (counsel--call
+ (counsel--command
"dconf"
"write"
"/org/gnome/rhythmbox/player/play-order"
