master e8d90a3: Remove unused let-bindings from pixel-scroll.el

[Po Lu]

branch: master
commit e8d90a3fd402c0c67bf4b4b29ac26108ead8845d
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Remove unused let-bindings from pixel-scroll.el
    
    * lisp/pixel-scroll.el
    (pixel-scroll-precision-scroll-down-page): Remove unused
    bindings.
---
 lisp/pixel-scroll.el | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el
index d7ce0bc..813fbb0 100644
--- a/lisp/pixel-scroll.el
+++ b/lisp/pixel-scroll.el
@@ -436,7 +436,6 @@ the height of the current window."
   (let* ((desired-pos (posn-at-x-y 0 (+ delta
                                        (window-tab-line-height)
                                        (window-header-line-height))))
-         (object (posn-object desired-pos))
         (desired-start (posn-point desired-pos))
          (current-vs (window-vscroll nil t))
          (start-posn (unless (eq desired-start (window-start))
@@ -451,10 +450,7 @@ the height of the current window."
                      (goto-char desired-start)
                      (when (zerop (vertical-motion (1+ scroll-margin)))
                        (signal 'end-of-buffer nil))
-                     (point)))
-         (end-pos (posn-at-x-y 0 (+ usable-height
-                                    (window-tab-line-height)
-                                   (window-header-line-height)))))
+                     (point))))
     (when (and (or (< (point) next-pos))
                (let ((pos-visibility (pos-visible-in-window-p next-pos nil t)))
                  (and pos-visibility