# HG changeset patch # User Richard M. Stallman # Date 780216150 0 # Node ID 06a5ceb0fb21a97da5901528b3530ff511dcfd34 # Parent 2281d87b7c9189f54c727f7893646e3a91101128 (insert-parentheses): Don't insert spaces at beginning and end of buffer. diff -r 2281d87b7c91 -r 06a5ceb0fb21 lisp/emacs-lisp/lisp.el --- 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 " "))))