changeset 8996:06a5ceb0fb21

(insert-parentheses): Don't insert spaces at beginning and end of buffer.
author Richard M. Stallman <rms@gnu.org>
date Thu, 22 Sep 1994 06:42:30 +0000
parents 2281d87b7c91
children 6616ea991c4a
files lisp/emacs-lisp/lisp.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp.el	Thu Sep 22 06:37:06 1994 +0000
+++ b/lisp/emacs-lisp/lisp.el	Thu Sep 22 06:42:30 1994 +0000
@@ -218,6 +218,7 @@
     (setq arg 0))
   (or (eq arg 0) (skip-chars-forward " \t"))
   (and parens-require-spaces
+       (not (bobp))
        (memq (char-syntax (preceding-char)) '(?w ?_ ?\) ))
        (insert " "))
   (insert ?\()
@@ -225,6 +226,7 @@
     (or (eq arg 0) (forward-sexp arg))
     (insert ?\))
     (and parens-require-spaces
+	 (not (eobp))
 	 (memq (char-syntax (following-char)) '(?w ?_ ?\( ))
 	 (insert " "))))