[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/org-tree-slide d9fede1544 127/144: Merge pull request #36
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/org-tree-slide d9fede1544 127/144: Merge pull request #36 from KaratasFurkan/create-variable-content-margin-top |
Date: |
Tue, 18 Jan 2022 08:59:55 -0500 (EST) |
branch: elpa/org-tree-slide
commit d9fede1544f97ae688fbbc56aa7208939a4ecbf1
Merge: 18034c4760 aa2140f62b
Author: Takaaki ISHIKAWA <takaxp@ieee.org>
Commit: GitHub <noreply@github.com>
Merge pull request #36 from KaratasFurkan/create-variable-content-margin-top
Create custom variable org-tree-slide-content-margin-top
---
org-tree-slide.el | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/org-tree-slide.el b/org-tree-slide.el
index 76630f4c6d..eefca6bd1f 100644
--- a/org-tree-slide.el
+++ b/org-tree-slide.el
@@ -112,6 +112,11 @@ When nil, the body of the subtrees will be revealed."
:type 'boolean
:group 'org-tree-slide)
+(defcustom org-tree-slide-content-margin-top 2
+ "Specify the number of blank lines, the slide will move from this line."
+ :type 'integer
+ :group 'org-tree-slide)
+
(defcustom org-tree-slide-slide-in-effect t
"Using a visual effect of slide-in for displaying trees."
:type 'boolean
@@ -711,7 +716,7 @@ If HEADING-LEVEL is non-nil, the provided outline level is
checked."
"Apply slide in. The slide will be moved from BLANK-LINES below to top."
(let ((min-line -1))
(when org-tree-slide-header
- (setq min-line 2))
+ (setq min-line org-tree-slide-content-margin-top))
(while (< min-line blank-lines)
(org-tree-slide--set-slide-header blank-lines)
(sit-for org-tree-slide-slide-in-waiting)
@@ -830,7 +835,7 @@ Some number of BLANK-LINES will be shown below the header."
(defun org-tree-slide--show-slide-header (&optional lines)
"Show header. When LINES is nil, the default value is 2."
- (org-tree-slide--set-slide-header (or lines 2)))
+ (org-tree-slide--set-slide-header (or lines
org-tree-slide-content-margin-top)))
(defun org-tree-slide--hide-slide-header ()
"Hide header."
- [nongnu] elpa/org-tree-slide d81195b0df 100/144: Refine docstrings, (continued)
- [nongnu] elpa/org-tree-slide d81195b0df 100/144: Refine docstrings, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 2b833e9faa 101/144: Update comments, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 062035ec7b 102/144: Extract header colors from default face of frame, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 946984e924 106/144: Add new private functions, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 036a36eec1 112/144: Rename an internal variable, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide e17dc06053 105/144: Referectaring, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 9d15bd9fa1 113/144: Add support for date header, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 7151aaf4df 117/144: Add FUNDING.yml, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 6cd71afa35 118/144: Add org-tree-slide-indicator, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 7983492eda 124/144: Fix minor typo in README (slip -> skip), ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide d9fede1544 127/144: Merge pull request #36 from KaratasFurkan/create-variable-content-margin-top,
ELPA Syncer <=
- [nongnu] elpa/org-tree-slide 5e5dbd908e 119/144: Update README.org, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 7126a43650 123/144: Fix typo, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 619fbb17a2 121/144: buffer-narrowed-p is applied, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 1fb3ecb637 132/144: Refine the default of header-overlay-face, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide daeb80986c 137/144: Fix face remap specifications, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 3faa042393 144/144: Merge pull request #49 from takaxp/revert-47-allow-empty-date-author, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide a0a03e75f4 083/144: Show content after last slide, ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 2571cfe03b 017/144: Version 2.2.0 (adopt minor mode), ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 68779b8fe4 092/144: Add breadcrumbs (#23), ELPA Syncer, 2022/01/18
- [nongnu] elpa/org-tree-slide 3a2d3733ba 091/144: Added Version header, ELPA Syncer, 2022/01/18