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

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

[elpa] externals/org 07eced3639 2/2: org-make-parameter-alist: Change th


From: ELPA Syncer
Subject: [elpa] externals/org 07eced3639 2/2: org-make-parameter-alist: Change the argument name
Date: Mon, 21 Nov 2022 22:57:59 -0500 (EST)

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

    org-make-parameter-alist: Change the argument name
    
    * lisp/org-macs.el (org-make-parameter-alist): Change the argument
    name to conventional PLIST, as the FIXME suggests.
---
 lisp/org-macs.el | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/lisp/org-macs.el b/lisp/org-macs.el
index 541413a64a..9188999007 100644
--- a/lisp/org-macs.el
+++ b/lisp/org-macs.el
@@ -1324,15 +1324,14 @@ that will be added to PLIST.  Returns the string that 
was modified."
    0 (length string) (if props (append plist props) plist) string)
   string)
 
-(defun org-make-parameter-alist (flat)
-  ;; FIXME: "flat" is called a "plist"!
-  "Return alist based on FLAT.
-FLAT is a list with alternating symbol names and values.  The
-returned alist is a list of lists with the symbol name in car and
-the value in cadr."
-  (when flat
-    (cons (list (car flat) (cadr flat))
-         (org-make-parameter-alist (cddr flat)))))
+(defun org-make-parameter-alist (plist)
+  "Return alist based on PLIST.
+PLIST is a property list with alternating symbol names and values.
+The returned alist is a list of lists with the symbol name in `car'
+and the value in `cadr'."
+  (when plist
+    (cons (list (car plist) (cadr plist))
+         (org-make-parameter-alist (cddr plist)))))
 
 (defsubst org-get-at-bol (property)
   "Get text property PROPERTY at the beginning of line."



reply via email to

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