Mercurial > emacs

changeset 43118:e1b601e414dd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(pong-height): Don't use height that exceeds the frame height.
author Eli Zaretskii <eliz@gnu.org>
date Wed, 06 Feb 2002 11:34:54 +0000
parents 7541bec297e3
children 831d45b0807e
files lisp/play/pong.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/play/pong.el	Wed Feb 06 11:34:07 2002 +0000
+++ b/lisp/play/pong.el	Wed Feb 06 11:34:54 2002 +0000
@@ -49,7 +49,7 @@
   :group 'pong
   :type '(integer))
 
-(defcustom pong-height 30
+(defcustom pong-height (min 30 (- (frame-height) 6))
   "*Height of the playfield."
   :group 'pong
   :type '(integer))