Fix popup system not cleaning up buffers with ttl

Because of extra parentheses causing essential logic from running. I am
a silly goose.
This commit is contained in:
Henrik Lissner 2018-07-01 00:57:27 +02:00
parent 866c97bcb2
commit cddde09b79
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -88,8 +88,8 @@ and enables `+popup-buffer-mode'."
(signal 'wrong-type-argument (list 'integerp ttl)))
((= ttl 0)
(+popup--kill-buffer buffer 0))
((add-hook 'kill-buffer-hook #'+popup|kill-buffer-hook nil t))
((setq +popup--timer
((add-hook 'kill-buffer-hook #'+popup|kill-buffer-hook nil t)
(setq +popup--timer
(run-at-time ttl nil #'+popup--kill-buffer
buffer ttl))))))))))