[elpa] 06/09: Fix last change

[Leo Liu]

leoliu pushed a commit to branch master
in repository elpa.

commit 5a3c24af17178d77ff2c39b95b97a093765ffe38
Author: Leo Liu <address@hidden>
Date:   Mon Feb 17 10:59:47 2014 +0800

    Fix last change
    
    which causes error:
      ggtags-get-libpath: Invalid function: ggtags-with-process-environment
---
 ggtags.el |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/ggtags.el b/ggtags.el
index 94e9374..87d7127 100644
--- a/ggtags.el
+++ b/ggtags.el
@@ -251,10 +251,6 @@ properly update `ggtags-mode-map'."
     (and (stringp (car xs))
          (ggtags-list-of-string-p (cdr xs)))))
 
-(defun ggtags-get-libpath ()
-  (when-let (path (ggtags-with-process-environment (getenv "GTAGSLIBPATH")))
-    (split-string path (regexp-quote path-separator) t)))
-
 (defun ggtags-process-string (program &rest args)
   (with-temp-buffer
     (let ((exit (apply #'process-file program nil t nil args))
@@ -425,6 +421,10 @@ properly update `ggtags-mode-map'."
        (unwind-protect (save-current-buffer ,@body)
          (setq ggtags-project ,ggproj)))))
 
+(defun ggtags-get-libpath ()
+  (when-let (path (ggtags-with-current-project (getenv "GTAGSLIBPATH")))
+    (split-string path (regexp-quote path-separator) t)))
+
 (defun ggtags-create-tags (root)
   "Run `gtags' in directory ROOT to create tag files."
   (interactive "DRoot directory: ")