# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 744399917 0
# Node ID cb81eadd0df54b61bcba312749596968ba628149
# Parent  4d7048ac2a72c2f8546a716ab29c7d731f6a69f0
(window-setup-hook): Add hook function.

diff -r 4d7048ac2a72 -r cb81eadd0df5 lisp/paren.el
--- a/lisp/paren.el	Tue Aug 03 07:52:10 1993 +0000
+++ b/lisp/paren.el	Tue Aug 03 17:45:17 1993 +0000
@@ -125,7 +125,14 @@
     (progn
       (setq blink-paren-function nil)
       (add-hook 'post-command-hook 'show-paren-command-hook)))
-
+;;; This is in case paren.el is preloaded.
+(add-hook 'window-setup-hook
+	  (function (lambda ()
+		      (if window-system
+			  (progn
+			    (setq blink-paren-function nil)
+			    (add-hook 'post-command-hook
+				      'show-paren-command-hook))))))
 (provide 'paren)
 
 ;;; paren.el ends here