# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 834967831 0
# Node ID 4b82998394aef385ca5ca1be4d7ab1cd153ea6a4
# Parent  87c6c9287f45383983c2242973439a77bfdb1876
(local-variables-section): Deleted.

diff -r 87c6c9287f45 -r 4b82998394ae lisp/skeleton.el
--- a/lisp/skeleton.el	Sun Jun 16 23:09:17 1996 +0000
+++ b/lisp/skeleton.el	Sun Jun 16 23:30:31 1996 +0000
@@ -382,32 +382,32 @@
 
 ;; Maybe belongs into simple.el or elsewhere
 
-(define-skeleton local-variables-section
-  "Insert a local variables section.  Use current comment syntax if any."
-  ()
-  '(save-excursion
-     (if (re-search-forward page-delimiter nil t)
-	 (error "Not on last page.")))
-  comment-start "Local Variables:" comment-end \n
-  comment-start "mode: "
-  (completing-read "Mode: " obarray
-		   (lambda (symbol)
-		     (if (commandp symbol)
-			 (string-match "-mode$" (symbol-name symbol))))
-		   t)
-  & -5 | '(kill-line 0) & -1 | comment-end \n
-  ( (completing-read (format "Variable, %s: " skeleton-subprompt)
-		     obarray
-		     (lambda (symbol)
-		       (or (eq symbol 'eval)
-			   (user-variable-p symbol)))
-		     t)
-    comment-start str ": "
-    (read-from-minibuffer "Expression: " nil read-expression-map nil
-			  'read-expression-history) | _
-    comment-end \n)
-  resume:
-  comment-start "End:" comment-end)
+;;;(define-skeleton local-variables-section
+;;;  "Insert a local variables section.  Use current comment syntax if any."
+;;;  ()
+;;;  '(save-excursion
+;;;     (if (re-search-forward page-delimiter nil t)
+;;;	 (error "Not on last page.")))
+;;;  comment-start "Local Variables:" comment-end \n
+;;;  comment-start "mode: "
+;;;  (completing-read "Mode: " obarray
+;;;		   (lambda (symbol)
+;;;		     (if (commandp symbol)
+;;;			 (string-match "-mode$" (symbol-name symbol))))
+;;;		   t)
+;;;  & -5 | '(kill-line 0) & -1 | comment-end \n
+;;;  ( (completing-read (format "Variable, %s: " skeleton-subprompt)
+;;;		     obarray
+;;;		     (lambda (symbol)
+;;;		       (or (eq symbol 'eval)
+;;;			   (user-variable-p symbol)))
+;;;		     t)
+;;;    comment-start str ": "
+;;;    (read-from-minibuffer "Expression: " nil read-expression-map nil
+;;;			  'read-expression-history) | _
+;;;    comment-end \n)
+;;;  resume:
+;;;  comment-start "End:" comment-end)
 
 ;; Variables and command for automatically inserting pairs like () or "".