* lisp/custom.el (custom-declare-group): No need to purecopy

custom-current-group-alist members following recent change to set it to nil before dumping.
2015-04-21 21:30:54 -04:00
parent b50f9bc964
commit 3f2c8b8264
1 changed files with 1 additions and 2 deletions
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -449,8 +449,7 @@ information."
  ;; Record the group on the `current' list.
  (let ((elt (assoc load-file-name custom-current-group-alist)))
    (if elt (setcdr elt symbol)
-      (push (cons (purecopy load-file-name) symbol)
-	    custom-current-group-alist)))
+      (push (cons load-file-name symbol) custom-current-group-alist)))
  (run-hooks 'custom-define-hook)
  symbol)