[nongnu] elpa/scroll-on-drag 2d79a6d9c2 18/35: Cleanup: minor syntax changes

[ELPA Syncer]

branch: elpa/scroll-on-drag
commit 2d79a6d9c2497f701335fd66154a67cd51073c9f
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Cleanup: minor syntax changes
---
 scroll-on-drag.el | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/scroll-on-drag.el b/scroll-on-drag.el
index 1d1b4cf017..aad52356fd 100644
--- a/scroll-on-drag.el
+++ b/scroll-on-drag.el
@@ -35,11 +35,7 @@
 (defcustom scroll-on-drag-style 'line-by-pixel
   "The method of scrolling."
   :group 'scroll-on-drag
-  :type
-  '
-  (choice
-    (const :tag "Line" line)
-    (const :tag "Line-By-Pixel" line-by-pixel)))
+  :type '(choice (const :tag "Line" line) (const :tag "Line-By-Pixel" 
line-by-pixel)))
 
 (defcustom scroll-on-drag-delay 0.01
   "Idle time between scroll updates."
@@ -126,8 +122,9 @@ Argument ALSO-MOVE-POINT When non-nil, move the POINT as 
well."
           (scroll-px (- scroll-px-next (* lines char-height)))
           (lines-remainder 0))
         (unless (zerop lines)
+          ;; flip
           (setq lines-remainder
-            (- (scroll-on-drag--scroll-by-lines window (- lines) 
also-move-point))) ;; flip
+            (- (scroll-on-drag--scroll-by-lines window (- lines) 
also-move-point)))
           (unless (zerop lines-remainder)
             (setq scroll-px char-height)))
         (set-window-vscroll window (- char-height scroll-px) t)