[nongnu] elpa/org-superstar 8077107c9f 157/162: improve code of disabling org-superstar in source code block

[Stefan Kangas]

branch: elpa/org-superstar
commit 8077107c9fbded46d28e5503099f6835a5eeae1f
Author: trungtq <taquangtrungvn@gmail.com>
Commit: trungtq <taquangtrungvn@gmail.com>

    improve code of disabling org-superstar in source code block
---
 org-superstar.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/org-superstar.el b/org-superstar.el
index 178b14ef77..8ed6f52cef 100644
--- a/org-superstar.el
+++ b/org-superstar.el
@@ -637,12 +637,10 @@ This function may be expensive for files with very large 
plain
 lists; consider using ‘org-superstar-toggle-lightweight-lists’ in
 such cases to avoid slowdown."
   (or org-superstar-lightweight-lists
-      (and (save-match-data
+      (save-match-data
+        (and (not (org-in-src-block-p))
             (org-element-lineage (org-element-at-point)
-                                 '(plain-list) t))
-           (save-match-data
-             (not (org-in-src-block-p)))
-          t)))
+                                 '(plain-list) t)))))
 
 (defun org-superstar-headline-or-inlinetask-p ()
   "Return t if the current match is a proper headline or inlinetask."