From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 12 Oct 1999 22:19:26 +0000 (+0000)
Subject: Doc-string fixes.
X-Git-Tag: emacs-pretest-21.0.90~6458
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1a7244d9c5d0dc6fddc90dff01ddc5fde08b26da;p=emacs.git

Doc-string fixes.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 185966b6efd..a0cc9ac8e60 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+1999-10-12  Emmanuel Briot  <briot@gnat.com>
+
+	* ada-stmt.el: Doc-string fixes.
+
 1999-10-12  Gerd Moellmann  <gerd@gnu.org>
 
 	* recentf.el: New file.
diff --git a/lisp/progmodes/ada-stmt.el b/lisp/progmodes/ada-stmt.el
index 2823ca08e3b..9f822ddfb9f 100644
--- a/lisp/progmodes/ada-stmt.el
+++ b/lisp/progmodes/ada-stmt.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 1987, 1993, 1994, 1996, 1997 Free Software Foundation, Inc.
 
-;; Ada Core Technologies's version:   $Revision: 1.10 $ 
+;; Ada Core Technologies's version:   $Revision: 1.1 $ 
 
 ;; Authors: Daniel Pfeiffer, Markus Heritsch, Rolf Ebert <ebert@waporo.muc.de>
 ;; Maintainer: Rolf Ebert <ebert@waporo.muc.de>
@@ -162,15 +162,15 @@
 ;;; ---- statement skeletons ------------------------------------------
 
 (define-skeleton ada-array
-  "Insert array type definition.  Uses the minibuffer to prompt
-for component type and index subtypes."
+  "Insert array type definition.
+Uses the minibuffer to prompt for component type and index subtypes."
   ()
   "array (" ("index definition: " str ", " ) -2 ") of " _ ?\;)
 
 
 (define-skeleton ada-case
-  "Build skeleton case statement, prompting for the selector expression.
-Also builds the first when clause."
+  "Build skeleton case statement.
+Prompt for the selector expression. Also builds the first when clause."
   "[selector expression]: "
   "case " str " is" \n
   > "when " ("discrete choice: " str " | ") -3 " =>" \n