[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/org-contrib f685314aca: lisp/ox-s5.el: Switch to lexical b
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/org-contrib f685314aca: lisp/ox-s5.el: Switch to lexical binding |
Date: |
Sat, 9 Dec 2023 07:00:22 -0500 (EST) |
branch: elpa/org-contrib
commit f685314aca8544483359891e476d0e781890df1a
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
lisp/ox-s5.el: Switch to lexical binding
* lisp/ox-s5.el (org-s5-toc): Remove unused let-binding.
(org-s5-plain-list):
(org-s5-inner-template): Mark unused function arguments as _ and
update the docstring.
---
lisp/ox-s5.el | 15 ++++++---------
1 file changed, 6 insertions(+), 9 deletions(-)
diff --git a/lisp/ox-s5.el b/lisp/ox-s5.el
index c5d0356c5c..6e147eb81c 100644
--- a/lisp/ox-s5.el
+++ b/lisp/ox-s5.el
@@ -1,4 +1,4 @@
-;;; ox-s5.el --- S5 Presentation Back-End for Org Export Engine
+;;; ox-s5.el --- S5 Presentation Back-End for Org Export Engine -*-
lexical-binding: t; -*-
;; Copyright (C) 2011-2014, 2021 Rick Frankel
@@ -212,8 +212,7 @@ INFO is a plist used as a communication channel."
(and tags " ") (org-html--tags tags info))))
(defun org-s5-toc (depth info)
- (let* ((headlines (org-export-collect-headlines info depth))
- (toc-entries
+ (let* ((toc-entries
(mapcar (lambda (headline)
(cons (org-s5--format-toc-headline headline info)
(org-export-get-relative-level headline info)))
@@ -275,10 +274,9 @@ INFO is a plist used as a communication channel."
(org-element-put-property headline :HTML_CONTAINER_CLASS (concat class "
slide")))
(org-html-headline headline contents info)))
-(defun org-s5-plain-list (plain-list contents info)
+(defun org-s5-plain-list (plain-list contents _)
"Transcode a PLAIN-LIST element from Org to HTML.
-CONTENTS is the contents of the list. INFO is a plist holding
-contextual information.
+CONTENTS is the contents of the list.
If a containing headline has the property :INCREMENTAL,
then the \"incremental\" class will be added to the to the list,
which will make the list into a \"build\"."
@@ -295,10 +293,9 @@ which will make the list into a \"build\"."
contents
(format "</%s>" tag))))
-(defun org-s5-inner-template (contents info)
+(defun org-s5-inner-template (contents _)
"Return body of document string after HTML conversion.
-CONTENTS is the transcoded contents string. INFO is a plist
-holding export options."
+CONTENTS is the transcoded contents string."
(concat contents "\n"))
(defun org-s5-template (contents info)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/org-contrib f685314aca: lisp/ox-s5.el: Switch to lexical binding,
ELPA Syncer <=