/[emacs]/emacs/lisp/progmodes/ada-mode.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/ada-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.43.4.1 by monnier, Tue Nov 13 20:18:40 2001 UTC revision 1.43.4.2 by schwab, Thu Nov 15 16:20:56 2001 UTC
# Line 937  name" Line 937  name"
937          (setcdr tmp (list (cons body (cadr tmp))))          (setcdr tmp (list (cons body (cadr tmp))))
938        (add-to-list 'ada-other-file-alist (list reg (list body)))))        (add-to-list 'ada-other-file-alist (list reg (list body)))))
939    
940    (add-to-list 'auto-mode-alist (cons spec 'ada-mode))    (add-to-list 'auto-mode-alist
941    (add-to-list 'auto-mode-alist (cons body 'ada-mode))                 (cons (concat (regexp-quote spec) "\\'") 'ada-mode))
942      (add-to-list 'auto-mode-alist
943                   (cons (concat (regexp-quote body) "\\'") 'ada-mode))
944    
945    (add-to-list 'ada-spec-suffixes spec)    (add-to-list 'ada-spec-suffixes spec)
946    (add-to-list 'ada-body-suffixes body)    (add-to-list 'ada-body-suffixes body)

Legend:
Removed from v.1.43.4.1  
changed lines
  Added in v.1.43.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26