[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 4014e32 38/50: make comments respect conventions
From: |
Michael Heerdegen |
Subject: |
[elpa] master 4014e32 38/50: make comments respect conventions |
Date: |
Mon, 09 Nov 2015 03:35:52 +0000 |
branch: master
commit 4014e320c4831bdaf930c7d98b23001a92175c48
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>
make comments respect conventions
---
on-screen.el | 16 ++++++++--------
1 files changed, 8 insertions(+), 8 deletions(-)
diff --git a/on-screen.el b/on-screen.el
index 71cd684..9e0e54e 100644
--- a/on-screen.el
+++ b/on-screen.el
@@ -108,7 +108,7 @@
;;; Code:
-;;; Requirements
+;;;; Requirements
(require 'cl-lib)
(require 'timer)
@@ -120,7 +120,7 @@
(declare-function hexrgb-increment-hue "hexrgb")
-;;; Configuration stuff
+;;;; Configuration stuff
(defgroup on-screen nil
"Guide your eyes while scrolling."
@@ -169,7 +169,7 @@ Ignored if highlighting doesn't use the fringe."
(defface on-screen-shadow
'((((class color) (min-colors 88) (background light))
- :background "#f2efcb" ;; alternative: "#f5f4ff" is a bit less intrusive
+ :background "#f2efcb" ; alternative: "#f5f4ff" is a bit less intrusive
)
(((class color) (min-colors 88) (background dark))
:background "#272620")
@@ -256,7 +256,7 @@ If a function, it will be called with zero arguments.
Highlighting will be inhibited if the result is non-nil.")
-;;; Other variables
+;;;; Other variables
(defvar on-screen-overlay-priority 30 ; > stripe buffer, < ediff, isearch
"Priority for all on-screen overlays.")
@@ -271,7 +271,7 @@ Highlighting will be inhibited if the result is non-nil.")
(defvar on-screen-last-change 0)
-;;; User Commands
+;;;; User Commands
;;;###autoload
(define-minor-mode on-screen-mode
@@ -305,7 +305,7 @@ Type M-x customize-group on-screen RET for configuration."
(defalias 'global-on-screen-mode 'on-screen-global-mode)
-;;; Internal functions
+;;;; Internal functions
(defun on-screen-window-start (&optional window)
"Like `window-start', but exclude partially visible lines."
@@ -315,7 +315,7 @@ Type M-x customize-group on-screen RET for configuration."
start
(cl-destructuring-bind (_x _y rtop _rbot rowh _vpos) vis
(if (< (/ (float rtop) (+ rtop rowh))
- (if (floatp on-screen-treat-cut-lines)
on-screen-treat-cut-lines .4)) ;; count as visible
+ (if (floatp on-screen-treat-cut-lines)
on-screen-treat-cut-lines .4)) ; count as visible
start
(with-current-buffer (window-buffer window)
(save-excursion
@@ -331,7 +331,7 @@ Type M-x customize-group on-screen RET for configuration."
end
(cl-destructuring-bind (_x _y _rtop rbot rowh _vpos) vis
(if (< (/ (float rbot) (+ rbot rowh))
- (if (floatp on-screen-treat-cut-lines)
on-screen-treat-cut-lines .4)) ;; count as visible
+ (if (floatp on-screen-treat-cut-lines)
on-screen-treat-cut-lines .4)) ; count as visible
end
(with-current-buffer (window-buffer window)
(save-excursion
- [elpa] master b1c1f7e 32/50: new option: on-screen-drawing-threshold, (continued)
- [elpa] master b1c1f7e 32/50: new option: on-screen-drawing-threshold, Michael Heerdegen, 2015/11/08
- [elpa] master 259440a 26/50: add Package-Requires header, Michael Heerdegen, 2015/11/08
- [elpa] master 098325c 29/50: set default value of on-screen-treat-cut-lines to t, Michael Heerdegen, 2015/11/08
- [elpa] master 23cf5db 30/50: use lexical binding, Michael Heerdegen, 2015/11/08
- [elpa] master 787fe34 31/50: bump version to 1.1, Michael Heerdegen, 2015/11/08
- [elpa] master bef0f6d 37/50: silence compiler when hexrgb.el is not installed, Michael Heerdegen, 2015/11/08
- [elpa] master ef81e20 35/50: change default of on-screen-treat-cut-lines back to nil, Michael Heerdegen, 2015/11/08
- [elpa] master 7012d04 41/50: bump version to 1.3, Michael Heerdegen, 2015/11/08
- [elpa] master c03f4b0 33/50: new user variable: on-screen-inhibit-highlighting, Michael Heerdegen, 2015/11/08
- [elpa] master b51ac73 36/50: use separate face for "line" style highlighting, Michael Heerdegen, 2015/11/08
- [elpa] master 4014e32 38/50: make comments respect conventions,
Michael Heerdegen <=
- [elpa] master 49d5546 42/50: fix whitespace, no code change, Michael Heerdegen, 2015/11/08
- [elpa] master 7bb7f0d 46/50: add .gitignore, Michael Heerdegen, 2015/11/08
- [elpa] master 009d1a4 44/50: wrap (require 'cl-lib) in eval-when-compile, Michael Heerdegen, 2015/11/08
- [elpa] master 387cb55 40/50: add on-screen-unload-function, Michael Heerdegen, 2015/11/08
- [elpa] master 1570a0d 49/50: add "on-screen" to externals-list, Michael Heerdegen, 2015/11/08
- [elpa] master d08c167 48/50: on-screen: merge from remote repo, Michael Heerdegen, 2015/11/08
- [elpa] master 8e3c53d 34/50: bump version to 1.2, Michael Heerdegen, 2015/11/08
- [elpa] master 13bf083 39/50: handle on-screen-treat-cut-lines -> t nicely, Michael Heerdegen, 2015/11/08
- [elpa] master e023bf8 45/50: bump version, Michael Heerdegen, 2015/11/08
- [elpa] master 65bbd8d 50/50: Merge commit 'a66fc082499967627cb89802fc2783accea5cb4b', Michael Heerdegen, 2015/11/08