Use cl-rotatef

2022-12-09 09:18:39 +09:00 · 2022-12-09 09:18:39 +09:00 · c2e7eca907
parent a0490ed3b8
commit c2e7eca907
1 changed files with 1 additions and 1 deletions
--- a/solarized-definitions.el
+++ b/solarized-definitions.el
@ -165,7 +165,7 @@ the \"Gen RGB\" column in solarized-definitions.el to improve them further."
        (italic      (if solarized-italic 'italic 'unspecified)))
    (cond ((eq 'high solarized-contrast)
           (let ((orig-base3 base3))
-             (rotatef base01 base00 base0 base1 base2 base3)
+             (cl-rotatef base01 base00 base0 base1 base2 base3)
             (setf base3 orig-base3)))
          ((eq 'low solarized-contrast)
           (setf back      base02