From: minakaji <minakaji>
Date: Tue, 19 Dec 2000 21:00:48 +0000 (+0000)
Subject: * poe-18.el (set-frame-height): Typo fixed.
X-Git-Tag: apel-10_3~32
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0c8e32c3c943eaccbe302d0d8c39680e4e93a895;p=elisp%2Fapel.git

* poe-18.el (set-frame-height): Typo fixed.
---

diff --git a/ChangeLog b/ChangeLog
index 3c23c0c..006a94e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-12-20  NAKAJIMA Mikio  <minakaji@osaka.email.ne.jp>
+
+	* poe-18.el (set-frame-height): Typo fixed.
+
 2000-12-19  NAKAJIMA Mikio  <minakaji@osaka.email.ne.jp>
 
 	* make.bat: Do not echo.
diff --git a/poe-18.el b/poe-18.el
index 976222f..0087c6b 100644
--- a/poe-18.el
+++ b/poe-18.el
@@ -662,11 +662,11 @@ Optional third arg non-nil means that redisplay should use COLS columns
 but that the idea of the actual width of the frame should not be changed."
   (set-screen-width cols pretend))
 
-(defun set-frame-height (frame cols &optional pretend)
+(defun set-frame-height (frame lines &optional pretend)
   "Specify that the frame FRAME has LINES lines.
 Optional third arg non-nil means that redisplay should use LINES lines
 but that the idea of the actual height of the frame should not be changed."
-  (set-screen-height cols pretend))
+  (set-screen-height lines pretend))
 
 ;;; @@ Environment variables.
 ;;;