Fix org-auto-archive regexp

Moved from regexp-opt to a string as used in 'C-c a m' (with extra backslashes
as needed)

diff --git a/init.el b/init.el
index 6968010d8487bd42c329bb2e7fd00120da4f00f5..313c1de14eb2cd252245ba56538b7540ae62e5ec 100644 (file)
--- a/init.el
+++ b/init.el
@@ -275,7 +275,7 @@ Intended for use as an after-save-hook."
    (lambda ()
      (org-archive-subtree)
      (setq org-map-continue-from (org-element-property :begin (org-element-at-point))))
-   (regexp-opt '("/DONE" "/CANCELLED"))
+   "TODO=\"DONE\"|TODO=\"CANCELLED\""
    'file)
   (save-buffer))