branch: elpa/with-simulated-input
commit 6c2e0ece2d497f92bae187d8bc2d20044a2d792d
Author: Nikita Bloshchanevich <[email protected]>
Commit: Ryan C. Thompson <[email protected]>
Use #' for advice-add/-remove
---
with-simulated-input.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/with-simulated-input.el b/with-simulated-input.el
index 73a01245ed..065359622a 100644
--- a/with-simulated-input.el
+++ b/with-simulated-input.el
@@ -277,7 +277,8 @@ simulated idle time to be returned instead of the real
value."
(when (time-less-p (seconds-to-time 0) wsi-simulated-idle-time)
wsi-simulated-idle-time)
(apply orig-fun args)))
-(advice-add 'current-idle-time :around 'current-idle-time@simulate-idle-time)
+(advice-add 'current-idle-time
+ :around #'current-idle-time@simulate-idle-time)
(cl-defun wsi-simulate-idle-time (&optional secs actually-wait)
"Run all idle timers with delay less than SECS.
@@ -347,7 +348,8 @@ add other idle timers."
(defun with-simulated-input-unload-function ()
"Unload the `with-simulated-input' library."
- (advice-remove 'current-idle-time 'current-idle-time@simulate-idle-time))
+ (advice-remove 'current-idle-time
+ #'current-idle-time@simulate-idle-time))
(provide 'with-simulated-input)
