emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org 01bf57488c 2/4: lisp/org.el: Define `org-rear-nonst


From: ELPA Syncer
Subject: [elpa] externals/org 01bf57488c 2/4: lisp/org.el: Define `org-rear-nonsticky-at' defsubst before its first usage
Date: Sun, 30 Jul 2023 06:58:21 -0400 (EDT)

branch: externals/org
commit 01bf57488c7b2853624aab8b794e4887dfbddb66
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    lisp/org.el: Define `org-rear-nonsticky-at' defsubst before its first usage
    
    This fixes compiler warning.
---
 lisp/org.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 9957fe9501..e72cf056a3 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -5100,6 +5100,12 @@ stacked delimiters is N.  Escaping delimiters is not 
possible."
 
 (defvar org-emph-face nil)
 
+(defconst org-nonsticky-props
+  '(mouse-face highlight keymap invisible intangible help-echo org-linked-text 
htmlize-link))
+
+(defsubst org-rear-nonsticky-at (pos)
+  (add-text-properties (1- pos) pos (list 'rear-nonsticky 
org-nonsticky-props)))
+
 (defun org-do-emphasis-faces (limit)
   "Run through the buffer and emphasize strings."
   (let ((quick-re (format "\\([%s]\\|^\\)\\([~=*/_+]\\)"
@@ -5209,12 +5215,6 @@ prompted for."
     (insert string)
     (and move (backward-char 1))))
 
-(defconst org-nonsticky-props
-  '(mouse-face highlight keymap invisible intangible help-echo org-linked-text 
htmlize-link))
-
-(defsubst org-rear-nonsticky-at (pos)
-  (add-text-properties (1- pos) pos (list 'rear-nonsticky 
org-nonsticky-props)))
-
 (defun org-activate-links--overlays (limit)
   "Add link properties to links.
 This includes angle, plain, and bracket links."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]