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

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

[nongnu] elpa/pacmacs 6a91d72f35 359/472: terrify-ghost instead of reset


From: ELPA Syncer
Subject: [nongnu] elpa/pacmacs 6a91d72f35 359/472: terrify-ghost instead of reset-terrified-ghost
Date: Thu, 6 Jan 2022 21:59:39 -0500 (EST)

branch: elpa/pacmacs
commit 6a91d72f35b7f288b76312fa2023b70a45e77b6a
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    terrify-ghost instead of reset-terrified-ghost
    
    (#173)
---
 pacmacs.el | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/pacmacs.el b/pacmacs.el
index 2472f010be..874c51c1ef 100644
--- a/pacmacs.el
+++ b/pacmacs.el
@@ -430,12 +430,6 @@
              pacmacs--ghost-terrified-time-ms)
   ghost)
 
-(defun pacmacs--reset-terrified-ghost (terrified-ghost)
-  (plist-put terrified-ghost
-             :terrified-timer pacmacs--ghost-terrified-time-ms)
-  (plist-put terrified-ghost
-             :current-animation (pacmacs-load-anim "Terrified-Ghost")))
-
 (defun pacmacs--unterrify-ghost (terrified-ghost)
   (plist-put terrified-ghost :switch-direction-callback
              (pacmacs--switch-direction-animation-callback "Red-Ghost"))
@@ -451,7 +445,7 @@
   (setq pacmacs--ghosts nil)
 
   (dolist (terrified-ghost pacmacs--terrified-ghosts)
-    (pacmacs--reset-terrified-ghost terrified-ghost)))
+    (pacmacs--terrify-ghost terrified-ghost)))
 
 (defun pacmacs--unterrify-timed-out-ghosts ()
   (dolist (terrified-ghost (-filter #'pacmacs--terrified-ghost-timed-out-p



reply via email to

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