Fix redefinition error of categories ?U and ?u when resync dotfile

2015-05-14 00:22:03 -04:00 · 2015-05-14 00:22:03 -04:00 · 91f9833ac0
parent 7e18daf5f5
commit 91f9833ac0
1 changed files with 3 additions and 2 deletions
--- a/spacemacs/packages.el
+++ b/spacemacs/packages.el
@ -2686,8 +2686,9 @@ It is a string holding:
      :defer t
      :init
      (progn
-        (define-category ?U "Uppercase")
-        (define-category ?u "Lowercase")
+        (unless (category-docstring ?U)
+          (define-category ?U "Uppercase")
+          (define-category ?u "Lowercase"))
        (modify-category-entry (cons ?A ?Z) ?U)
        (modify-category-entry (cons ?a ?z) ?u)
        (make-variable-buffer-local 'evil-cjk-word-separating-categories)