Lines Matching defs:plist
805 :type 'plist)
2183 :type 'plist)
2762 (plist :tag "Face property list"))
3600 (defun org-add-props (string plist &rest props)
3605 0 (length string) (if props (append plist props) plist) string)
8703 (skip (plist-get params :skip))
8704 (skipcols (plist-get params :skipcols))
8799 (let ((val (plist-get params sym)))
8800 (and hsym header (setq val (or (plist-get params hsym) val)))
8801 (if (consp val) (plist-get val i) val)))
8850 (splicep (plist-get p :splice))
8851 (hline (plist-get p :hline))
8860 (push (or (plist-get p :tstart) "ERROR: no :tstart") rtn))
8891 (push (or (plist-get p :tend) "ERROR: no :tend") rtn))
8941 (let* ((splicep (plist-get params :splice))
8981 (colfrac (or (plist-get params :cf)
9022 (defvar org-store-link-plist nil
9034 (setq org-store-link-plist nil) ; reset
9256 (defun org-store-link-props (&rest plist)
9259 (when (setq x (plist-get plist :from))
9261 (plist-put plist :fromname (car adr))
9262 (plist-put plist :fromaddress (nth 1 adr)))
9263 (when (setq x (plist-get plist :to))
9265 (plist-put plist :toname (car adr))
9266 (plist-put plist :toaddress (nth 1 adr))))
9267 (let ((from (plist-get plist :from))
9268 (to (plist-get plist :to)))
9270 (plist-put plist :fromto
9274 (setq org-store-link-plist plist))
9278 This takes information from `org-store-link-plist' and formats it
9281 (let* ((p org-store-link-plist)
9282 (to (plist-get p :toaddress))
9283 (from (plist-get p :fromaddress))
9286 (cons "%c" (plist-get p :fromto))
9287 (cons "%F" (plist-get p :from))
9288 (cons "%f" (or (plist-get p :fromname) (plist-get p :fromaddress) "?"))
9289 (cons "%T" (plist-get p :to))
9290 (cons "%t" (or (plist-get p :toname) (plist-get p :toaddress) "?"))
9291 (cons "%s" (plist-get p :subject))
9292 (cons "%m" (plist-get p :message-id)))))
10438 (plist-p (if org-store-link-plist t nil))
10453 (setq org-store-link-plist
10478 (when plist-p
10481 (and (setq x (plist-get org-store-link-plist
10525 (let ((annotation (plist-get org-store-link-plist :annotation))
10526 (initial (plist-get org-store-link-plist :initial)))
10700 (defun org-create-dblock (plist)
10704 (let ((name (plist-get plist :name)))
10706 (while plist
10707 (if (eq (car plist) :name)
10708 (setq plist (cddr plist))
10709 (insert " " (prin1-to-string (pop plist)))))
10763 (name (plist-get params :name))
12829 (setq maxlevel (or (plist-get params :maxlevel) 3)
12830 emph (plist-get params :emphasize)
12831 ts (plist-get params :tstart)
12832 te (plist-get params :tend)
12833 block (plist-get params :block))
16028 (if (and p (member (car p) (plist-get org-format-latex-options :matchers)))
16055 (dodollar (member "$" (plist-get org-format-latex-options :matchers)))
16183 (matchers (plist-get opt :matchers))
16244 (scale (number-to-string (* 1000 (or (plist-get options :scale) 1.0))))
16245 (fg (or (plist-get options :foreground) "Black"))
16246 (bg (or (plist-get options :background) "Transparent")))
16297 (defconst org-export-plist-vars
16325 (defun org-default-export-plist ()
16327 (let ((l org-export-plist-vars) rtn e)
16332 (defun org-infile-export-plist ()
16343 ((string-equal key "TITLE") (setq p (plist-put p :title val)))
16344 ((string-equal key "AUTHOR")(setq p (plist-put p :author val)))
16345 ((string-equal key "EMAIL") (setq p (plist-put p :email val)))
16346 ((string-equal key "LANGUAGE") (setq p (plist-put p :language val)))
16350 (setq p (plist-put p :text text))
16368 (setq p (plist-put p (cdr o)
16373 (defun org-export-directory (type plist)
16374 (let* ((val (plist-get plist :publishing-directory))
16960 (let* ((opt-plist (org-combine-plists (org-default-export-plist)
16961 (org-infile-export-plist)))
16978 (org-export-directory :ascii opt-plist))
16987 (author (plist-get opt-plist :author))
16988 (title (or (plist-get opt-plist :title)
16991 (email (plist-get opt-plist :email))
16992 (language (plist-get opt-plist :language))
17013 (plist-get opt-plist (car x))))
17014 org-export-plist-vars)
17375 (defun org-export-as-html (arg &optional hidden ext-plist)
17389 (let* ((opt-plist (org-combine-plists (org-default-export-plist)
17390 ext-plist
17391 (org-infile-export-plist)))
17393 (style (plist-get opt-plist :style))
17394 (link-validate (plist-get opt-plist :link-validation-function))
17404 (org-current-export-dir (org-export-directory :html opt-plist))
17410 (if (plist-get opt-plist :LaTeX-fragments)
17418 (org-export-directory :html opt-plist))
17427 (author (plist-get opt-plist :author))
17428 (title (or (plist-get opt-plist :title)
17439 (email (plist-get opt-plist :email))
17440 (language (plist-get opt-plist :language))
17441 (text (plist-get opt-plist :text))
17479 (plist-get opt-plist (car x))))
17480 org-export-plist-vars)
17506 (insert (or (plist-get opt-plist :preamble) ""))
17508 (when (plist-get opt-plist :auto-preamble)
17863 (when (plist-get opt-plist :auto-postamble)
17878 (insert (or (plist-get opt-plist :postamble) ""))
18476 (let* ((opt-plist (org-combine-plists (org-default-export-plist)
18477 (org-infile-export-plist)))
18479 (org-export-directory :xoxo opt-plist))
19502 (setq rtn (plist-put rtn p v))))