diff options
| author | Kenichi Handa <handa@m17n.org> | 2010-01-15 14:13:05 +0900 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2010-01-15 14:13:05 +0900 |
| commit | fa0cff43e861a49d9f992ffccbe4f71e29d71e1a (patch) | |
| tree | 2a2bf41b76f624200d873bd604176cc6b7237f69 /lisp/progmodes/ada-xref.el | |
| parent | cc320f07d4d1c0033c1728d22421462ab1fcc04e (diff) | |
| parent | 56a03f46b825f2c22c7a982e8d4bcb5545908a09 (diff) | |
| download | emacs-fa0cff43e861a49d9f992ffccbe4f71e29d71e1a.tar.gz emacs-fa0cff43e861a49d9f992ffccbe4f71e29d71e1a.tar.bz2 emacs-fa0cff43e861a49d9f992ffccbe4f71e29d71e1a.zip | |
from trunk
Diffstat (limited to 'lisp/progmodes/ada-xref.el')
| -rw-r--r-- | lisp/progmodes/ada-xref.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/ada-xref.el b/lisp/progmodes/ada-xref.el index dd54736ef0b..bf836b20eee 100644 --- a/lisp/progmodes/ada-xref.el +++ b/lisp/progmodes/ada-xref.el @@ -755,7 +755,7 @@ is non-nil, prompt the user to select one. If none are found, return (let ((file (buffer-file-name nil))) (list ;; variable name alphabetical order - 'ada_project_path "" + 'ada_project_path (or (getenv "ADA_PROJECT_PATH") "") 'ada_project_path_sep ada-prj-ada-project-path-sep 'bind_opt ada-prj-default-bind-opt 'build_dir default-directory |