X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/d3c440073abf6a43548b8618cd1937cbfed79a1e..b2e9186ca29c6f9ffb5d2e511b25b65e00e30c7d:/packages/ada-mode/ada-build.el

diff --git a/packages/ada-mode/ada-build.el b/packages/ada-mode/ada-build.el
index 1cc935f7d..6166836e8 100644
--- a/packages/ada-mode/ada-build.el
+++ b/packages/ada-mode/ada-build.el
@@ -199,7 +199,7 @@ Returns non-nil if a file is selected, nil otherwise."
 		 ;; return a directory.
 		 (or (file-accessible-directory-p name)
 		     (member (file-name-extension name) ext)))))
-      (err                              ;FIXME: Shouldn't this be `error'?
+      (error
        (setq filename nil))
       )