]> code.delx.au - gnu-emacs-elpa/blobdiff - packages/ada-mode/ada-gnat-compile.el
release ada-mode 5.1.7, wisi 1.1.0; minor format changes in ada-ref-man (take 2)
[gnu-emacs-elpa] / packages / ada-mode / ada-gnat-compile.el
index 98f658027c10fd3d11f0f03cf0c3554b3a2af807..510bef1eec5d11e3f7e06690e7e7078a7a197c7a 100644 (file)
@@ -231,11 +231,12 @@ Prompt user if more than one."
                       ))
                   )));; unless while let
 
-            (setq unit-name (cond
-                              ((= 0 (length choices)) nil)
-                              ((= 1 (length choices)) (car choices))
-                              (t ;; multiple choices
-                               (completing-read "package name: " choices))))
+            (setq unit-name
+                  (cond
+                   ((= 0 (length choices)) nil)
+                   ((= 1 (length choices)) (car choices))
+                   (t ;; multiple choices
+                    (completing-read "package name: " choices))))
 
             (when unit-name
               (pop-to-buffer source-buffer)