ryuslash/circe-serenity
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix byte-compiler warning

Browse source
This commit is contained in:
Tom Willemse 2016-11-04 18:49:41 +01:00
parent aaf6ba2f03
commit 419105ab66
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
circe-serenity.el
View file

@ -197,7 +197,7 @@ key. A key :intro is added to the plist and then passed on to
"Disable Serenity for Circe." "Disable Serenity for Circe."
(interactive) (interactive)
(dolist (format-pair circe-serenity--formatters-alist) (dolist (format-pair circe-serenity--formatters-alist)
(cl-destructuring-bind (format . _) format-pair (let ((format (car format-pair)))
(set format (get format 'circe-serenity-original)) (set format (get format 'circe-serenity-original))
(put format 'circe-serenity-original nil)))) (put format 'circe-serenity-original nil))))