[Emacs-diffs] Changes to emacs/src/xdisp.c [lexbind]

[Miles Bader]

Index: emacs/src/xdisp.c
diff -c emacs/src/xdisp.c:1.754.2.20 emacs/src/xdisp.c:1.754.2.21
*** emacs/src/xdisp.c:1.754.2.20        Tue Jul  6 09:14:39 2004
--- emacs/src/xdisp.c   Tue Jul  6 09:24:09 2004
***************
*** 11002,11008 ****
          aggressive = current_buffer->scroll_up_aggressively;
          height = WINDOW_BOX_TEXT_HEIGHT (w);
          if (NUMBERP (aggressive))
!           amount_to_scroll = XFLOATINT (aggressive) * height;
        }
  
        if (amount_to_scroll <= 0)
--- 11002,11013 ----
          aggressive = current_buffer->scroll_up_aggressively;
          height = WINDOW_BOX_TEXT_HEIGHT (w);
          if (NUMBERP (aggressive))
!           {
!             double float_amount = XFLOATINT (aggressive) * height;
!             amount_to_scroll = float_amount;
!             if (amount_to_scroll == 0 && float_amount > 0)
!               amount_to_scroll = 1;
!           }
        }
  
        if (amount_to_scroll <= 0)
***************
*** 11060,11066 ****
              aggressive = current_buffer->scroll_down_aggressively;
              height = WINDOW_BOX_TEXT_HEIGHT (w);
              if (NUMBERP (aggressive))
!               amount_to_scroll = XFLOATINT (aggressive) * height;
            }
  
          if (amount_to_scroll <= 0)
--- 11065,11076 ----
              aggressive = current_buffer->scroll_down_aggressively;
              height = WINDOW_BOX_TEXT_HEIGHT (w);
              if (NUMBERP (aggressive))
!               {
!                 double float_amount = XFLOATINT (aggressive) * height;
!                 amount_to_scroll = float_amount;
!                 if (amount_to_scroll == 0 && float_amount > 0)
!                   amount_to_scroll = 1;
!               }
            }
  
          if (amount_to_scroll <= 0)