# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1267899803 18000
# Node ID 176028ab9fc6a89574be285bef8e244ff254837e
# Parent  8bc19ba3da902e50714084fd9b6a3be60fb1737a
* calculator.el (calculator): Don't bind split-window-keep-point (Bug#5674).

diff -r 8bc19ba3da90 -r 176028ab9fc6 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Mar 05 23:05:47 2010 -0500
+++ b/lisp/ChangeLog	Sat Mar 06 13:23:23 2010 -0500
@@ -1,3 +1,8 @@
+2010-03-06  Chong Yidong  <cyd@stupidchicken.com>
+
+	* calculator.el (calculator): Don't bind split-window-keep-point
+	(Bug#5674).
+
 2010-03-06  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* vc-git.el: Re-flow to fit into 80 columns.
diff -r 8bc19ba3da90 -r 176028ab9fc6 lisp/calculator.el
--- a/lisp/calculator.el	Fri Mar 05 23:05:47 2010 -0500
+++ b/lisp/calculator.el	Sat Mar 06 13:23:23 2010 -0500
@@ -724,8 +724,7 @@
     (progn
       (cond
         ((not (get-buffer-window calculator-buffer))
-         (let ((split-window-keep-point nil)
-               (window-min-height 2))
+         (let ((window-min-height 2))
            ;; maybe leave two lines for our window because of the normal
            ;; `raised' modeline in Emacs 21
            (select-window