[Emacs-diffs] Changes to emacs/lisp/progmodes/ada-stmt.el

[Juanma Barranquero]

Index: emacs/lisp/progmodes/ada-stmt.el
diff -c emacs/lisp/progmodes/ada-stmt.el:1.13 
emacs/lisp/progmodes/ada-stmt.el:1.14
*** emacs/lisp/progmodes/ada-stmt.el:1.13       Thu Oct  3 14:20:27 2002
--- emacs/lisp/progmodes/ada-stmt.el    Tue Feb  4 08:24:34 2003
***************
*** 29,35 ****
  ;; Nov 1993. Rolf Ebert <address@hidden> (RE) Moved the
  ;; skeleton generation into this separate file. The code still is
  ;; essentially written by DP
! ;; 
  ;; Adapted Jun 1994. Markus Heritsch
  ;; <address@hidden> (MH)
  ;; added menu bar support for templates
--- 29,35 ----
  ;; Nov 1993. Rolf Ebert <address@hidden> (RE) Moved the
  ;; skeleton generation into this separate file. The code still is
  ;; essentially written by DP
! ;;
  ;; Adapted Jun 1994. Markus Heritsch
  ;; <address@hidden> (MH)
  ;; added menu bar support for templates
***************
*** 432,438 ****
  ;  "Inserts a use clause, prompting for the list of packages used."
  ;  "[list of packages used]: "
  ;  "use " str ?\;)
!  
  
  (define-skeleton ada-record
    "Insert a skeleton record type declaration."
--- 432,438 ----
  ;  "Inserts a use clause, prompting for the list of packages used."
  ;  "[list of packages used]: "
  ;  "use " str ?\;)
! 
  
  (define-skeleton ada-record
    "Insert a skeleton record type declaration."
***************
*** 475,481 ****
    " (" ("[discriminant]: " str "; ") ") is\n"
    > "entry " _ \n
    <"end " str ";" )
!   
  
  (define-skeleton ada-get-param1
    "Prompt for arguments and if any enclose them in brackets."
--- 475,481 ----
    " (" ("[discriminant]: " str "; ") ") is\n"
    > "entry " _ \n
    <"end " str ";" )
! 
  
  (define-skeleton ada-get-param1
    "Prompt for arguments and if any enclose them in brackets."
***************
*** 556,562 ****
    "[delay value]: "
    < "or\n"
    > "delay " str ";")
!   
  
  (define-skeleton ada-or-terminate
    "Insert a terminate statement."
--- 556,562 ----
    "[delay value]: "
    < "or\n"
    > "delay " str ";")
! 
  
  (define-skeleton ada-or-terminate
    "Insert a terminate statement."