[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master abeb3ef 02/14: `process-environment` must be copied
From: |
Leo Liu |
Subject: |
[elpa] master abeb3ef 02/14: `process-environment` must be copied |
Date: |
Mon, 14 Dec 2015 21:52:40 +0000 |
branch: master
commit abeb3ef5e8f7262d9459a0e67d61851909a325d9
Author: egarrulo <address@hidden>
Commit: egarrulo <address@hidden>
`process-environment` must be copied
`process-environment` must be copied to have a temporary binding, otherwise
you will be modifying the original list. Or maybe `lexical-binding` changes
this?
---
ggtags.el | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/ggtags.el b/ggtags.el
index 52b96cf..2920dc6 100644
--- a/ggtags.el
+++ b/ggtags.el
@@ -647,7 +647,7 @@ When called with a prefix \\[universal-argument], choose
from past projects."
(ggtags-ensure-localname
(directory-file-name
(ggtags-current-project-root)))))
(process-environment
- (append (let ((process-environment process-environment))
+ (append (let ((process-environment (copy-sequence
process-environment)))
(and ,gtagsroot (setenv "GTAGSROOT" ,gtagsroot))
(mapcar #'substitute-env-vars
ggtags-process-environment))
process-environment
@@ -703,7 +703,7 @@ If file gtags.files exists in ROOT, it should be a list of
source
files to index, which can be used to speed gtags up in large
source trees. See Info node `(global)gtags' for details."
(interactive "DRoot directory: ")
- (let ((process-environment process-environment))
+ (let ((process-environment (copy-sequence process-environment)))
(when (zerop (length root)) (error "No root directory provided"))
(setenv "GTAGSROOT" (ggtags-ensure-localname
(expand-file-name
- [elpa] master updated (979b09b -> 77d6482), Leo Liu, 2015/12/14
- [elpa] master abeb3ef 02/14: `process-environment` must be copied,
Leo Liu <=
- [elpa] master 7937129 03/14: Merge pull request #107 from egarrulo/patch-1, Leo Liu, 2015/12/14
- [elpa] master 6153f5e 01/14: GNU Global 6.5 has renamed plugin-factory/README, Leo Liu, 2015/12/14
- [elpa] master 5eeb0a1 04/14: Correctly set ggtags-global-start-marker, Leo Liu, 2015/12/14
- [elpa] master ec3c6bb 09/14: Correct misspellings, Leo Liu, 2015/12/14
- [elpa] master 7e2a915 11/14: Merge pull request #117 from syohex/typo, Leo Liu, 2015/12/14
- [elpa] master d30ae7d 08/14: For #116: Provide a way to disable highlighting tag at point, Leo Liu, 2015/12/14
- [elpa] master d2a8892 12/14: Merge pull request #118 from syohex/update-url, Leo Liu, 2015/12/14
- [elpa] master d4fb6d4 13/14: Doc fix, Leo Liu, 2015/12/14
- [elpa] master ad3ae8d 07/14: Merge pull request #111 from kanru/patch-1, Leo Liu, 2015/12/14
- [elpa] master f155c3c 06/14: Avoid the jit-lock-mode to kick in when fontify code, Leo Liu, 2015/12/14