[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/scroll-on-drag 6d62a239a9 28/35: Cleanup: use defgroup
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/scroll-on-drag 6d62a239a9 28/35: Cleanup: use defgroup |
Date: |
Thu, 7 Jul 2022 12:02:52 -0400 (EDT) |
branch: elpa/scroll-on-drag
commit 6d62a239a9a6295c9c519827019cde8c6c3658fa
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>
Cleanup: use defgroup
---
scroll-on-drag.el | 22 +++++-----------------
1 file changed, 5 insertions(+), 17 deletions(-)
diff --git a/scroll-on-drag.el b/scroll-on-drag.el
index 9329211072..085daeebdf 100644
--- a/scroll-on-drag.el
+++ b/scroll-on-drag.el
@@ -35,44 +35,32 @@
;; ---------------------------------------------------------------------------
;; Custom Variables
+(defgroup scroll-on-drag nil "Configure smooth scrolling on drag." :group
'scrolling)
+
(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)))
-(defcustom scroll-on-drag-delay 0.01
- "Idle time between scroll updates."
- :group 'scroll-on-drag
- :type 'float)
+(defcustom scroll-on-drag-delay 0.01 "Idle time between scroll updates (in
seconds)." :type 'float)
-(defcustom scroll-on-drag-motion-scale 0.25
- "Scroll speed multiplier."
- :group 'scroll-on-drag
- :type 'float)
+(defcustom scroll-on-drag-motion-scale 0.25 "Scroll speed multiplier." :type
'float)
(defcustom scroll-on-drag-motion-accelerate 0.3
"Non-linear scroll power (0.0 for linear speed, 1.0 for very fast
acceleration)."
- :group 'scroll-on-drag
:type 'float)
-(defcustom scroll-on-drag-smooth t
- "Use smooth (pixel) scrolling."
- :group 'scroll-on-drag
- :type 'boolean)
+(defcustom scroll-on-drag-smooth t "Use smooth (pixel) scrolling." :type
'boolean)
(defcustom scroll-on-drag-pre-hook nil
"List of functions to be called when `scroll-on-drag' starts."
- :group 'scroll-on-drag
:type 'hook)
(defcustom scroll-on-drag-post-hook nil
"List of functions to be called when `scroll-on-drag' finishes."
- :group 'scroll-on-drag
:type 'hook)
(defcustom scroll-on-drag-redisplay-hook nil
"List of functions to run on scroll redraw."
- :group 'scroll-on-drag
:type 'hook)
- [nongnu] elpa/scroll-on-drag 01c14f4c02 35/35: Cleanup: quiet checkdoc warning, (continued)
- [nongnu] elpa/scroll-on-drag 01c14f4c02 35/35: Cleanup: quiet checkdoc warning, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 0a362232a0 19/35: Run 'run-window-scroll-functions' after scrolling, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 8962f5f8a7 30/35: Add scroll-on-drag-clamp option to prevent scrolling past point-max, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 2d79a6d9c2 18/35: Cleanup: minor syntax changes, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 97741be699 32/35: Remove override for timer-idle-list, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag f9379c56df 03/35: Call redisplay explicitly, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 56ab51a329 07/35: Use zerop instead of comparing with zero, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 882dc94bb8 12/35: Cleanup: remove unused variables, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag cacadcd9bd 20/35: Cleanup: add sections, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 271b4aa6b3 11/35: Add redisplay hook, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 6d62a239a9 28/35: Cleanup: use defgroup,
ELPA Syncer <=
- [nongnu] elpa/scroll-on-drag 6db1380826 25/35: Cleanup: formatting, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag ba2c1a598e 17/35: Fix for idle timers running during scroll, ELPA Syncer, 2022/07/07
- [nongnu] elpa/scroll-on-drag 157637ba6b 26/35: Remove cursor setting code (resolving #1), ELPA Syncer, 2022/07/07