From 0a44651c4130ade5fba19921a527a03244328cf5 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 6 Oct 1999 22:43:39 +0000 Subject: [PATCH] (gnus-xmas-group-startup-message): Don't use negative number for the 2nd arg of `insert-char'. --- lisp/gnus-xmas.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/gnus-xmas.el b/lisp/gnus-xmas.el index 2aed9fd..7083077 100644 --- a/lisp/gnus-xmas.el +++ b/lisp/gnus-xmas.el @@ -625,8 +625,9 @@ the resulting string may be narrower than END-COLUMN. `[xbm :file ,logo-xbm]) (t [nothing])))) (wpheight (window-pixel-height)) - (rest (1- (/ (* (- wpheight (glyph-height glyph)) (window-height)) - wpheight 2)))) + (rest (max 0 (1- (/ (* (- wpheight (glyph-height glyph)) + (window-height)) + wpheight 2))))) (insert " ") (set-extent-begin-glyph (make-extent (point) (point)) glyph) (goto-char (point-min)) -- 1.7.10.4