# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 772381895 0
# Node ID cbab396695ab76a2906b15b21ec5e3cef2bbb7c9
# Parent  518971c497f58fbdda504a04b48417d8c4ac78ba
(show-paren-command-hook): Set paren foreground to white.

diff -r 518971c497f5 -r cbab396695ab lisp/paren.el
--- a/lisp/paren.el	Thu Jun 23 14:24:38 1994 +0000
+++ b/lisp/paren.el	Thu Jun 23 14:31:35 1994 +0000
@@ -86,7 +86,9 @@
 			       (progn
 				 (make-face 'paren-mismatch)
 				 (set-face-background 'paren-mismatch
-						      "purple")))
+						      "purple")
+				 (set-face-foreground 'paren-mismatch
+						      "white")))
 			   (setq show-paren-mismatch-face 'paren-mismatch))
 		      (if show-paren-mismatch-face
 			  (setq face show-paren-mismatch-face)