diff --git a/init.el b/init.el
index 7b6d6fe..093905c 100644
--- a/init.el
+++ b/init.el
@@ -949,11 +949,10 @@ argument."
   ;; Fix `fricas-mode' messing up `completion-at-point-functions'
   (advice-add #'fricas-mode :around
               #'(lambda (oldfun &rest r)
-                  (let ((temp-capfs))
                     (let ((completion-at-point-functions '(t)))
                       (apply oldfun r)
-                      (setq temp-capfs completion-at-point-functions))
-                    (setq-local completion-at-point-functions temp-capfs)))
+                      (setq-local completion-at-point-functions
+                                  completion-at-point-functions)))
               '((name . "my/-fricas-fix-capfs")))
   :config
   (face-spec-set 'fricas-type-time '((t (:foreground unspecified