Commit 8794c483 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

Simplify previous change.

parent 95005d39
2010-01-14 Juanma Barranquero <lekktu@gmail.com>
* progmodes/ada-xref.el (ada-default-prj-properties):
Simplify previous change.
2010-01-14 Stephen Leake <stephen_leake@member.fsf.org> 2010-01-14 Stephen Leake <stephen_leake@member.fsf.org>
* progmodes/ada-xref.el (ada-default-prj-properties): * progmodes/ada-xref.el (ada-default-prj-properties):
......
...@@ -755,7 +755,7 @@ is non-nil, prompt the user to select one. If none are found, return ...@@ -755,7 +755,7 @@ is non-nil, prompt the user to select one. If none are found, return
(let ((file (buffer-file-name nil))) (let ((file (buffer-file-name nil)))
(list (list
;; variable name alphabetical order ;; variable name alphabetical order
'ada_project_path (let ((path (getenv "ADA_PROJECT_PATH"))) (if path path "")) 'ada_project_path (or (getenv "ADA_PROJECT_PATH") "")
'ada_project_path_sep ada-prj-ada-project-path-sep 'ada_project_path_sep ada-prj-ada-project-path-sep
'bind_opt ada-prj-default-bind-opt 'bind_opt ada-prj-default-bind-opt
'build_dir default-directory 'build_dir default-directory
......
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