lisp/speedbar.el (speedbar-supported-extension-expressions): Add .adb, .ads.

Fixes: debbugs:10256

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dac5d05e181..ed5af2e2b20 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-12-09  Manuel Gómez  <mgrojo@gmail.com>  (tiny change)
+
+        * speedbar.el (speedbar-supported-extension-expressions):
+        Add .adb and .ads, commonly used for Ada source code (bug#10256).
+
 2011-12-09  Juanma Barranquero  <lekktu@gmail.com>
 
         * printing.el (pr-mode-alist):
diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index 3e79095e52f..efe7832aca6 100644
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -696,7 +696,7 @@ function `speedbar-extension-list-to-regex'.")
   (append '(".[ch]\\(\\+\\+\\|pp\\|c\\|h\\|xx\\)?" ".tex\\(i\\(nfo\\)?\\)?"
             ".el" ".emacs" ".l" ".lsp" ".p" ".java" ".js" ".f\\(90\\|77\\|or\\)?")
           (if speedbar-use-imenu-flag
-              '(".ada" ".p[lm]" ".tcl" ".m" ".scm" ".pm" ".py" ".g"
+              '(".ad[abs]" ".p[lm]" ".tcl" ".m" ".scm" ".pm" ".py" ".g"
                 ;; html is not supported by default, but an imenu tags package
                 ;; is available.  Also, html files are nice to be able to see.
                 ".s?html"