From 6696af6580eea3a04f6459758b78817ee0f9d216 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 22 Sep 1994 06:42:30 +0000 Subject: (insert-parentheses): Don't insert spaces at beginning and end of buffer. --- lisp/emacs-lisp/lisp.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/emacs-lisp/lisp.el') diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index 07a22698c6e..fd9ae0c078a 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -218,6 +218,7 @@ before and after, depending on the surrounding characters." (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 @@ before and after, depending on the surrounding characters." (or (eq arg 0) (forward-sexp arg)) (insert ?\)) (and parens-require-spaces + (not (eobp)) (memq (char-syntax (following-char)) '(?w ?_ ?\( )) (insert " ")))) -- cgit v1.2.3