Commit 9993b561 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(select-tags-table): Don't modify the value of tags-table-list.

parent 3fd4909e
......@@ -1461,7 +1461,7 @@ see the doc of that variable if you want to add names to the list."
(prin1 tags-file-name (current-buffer)) ;invisible
(insert "\n")))
(setq set-list (delete tags-file-name
(apply 'nconc (cons tags-table-list
(apply 'nconc (cons (copy-sequence tags-table-list)
(mapcar 'copy-sequence
tags-table-set-list)))))
(while set-list
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment