MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.117.158.174
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/org/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/org/ob-plantuml.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:43 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/ob-plantuml.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301!\210\300\302!\207" [require ob ob-eval] 2)
#@59 Default arguments for evaluating a plantuml source block.
(defvar org-babel-default-header-args:plantuml '((:results . "file") (:exports . "results")) (#$ . 622))
#@32 Path to the plantuml.jar file.
(custom-declare-variable 'org-plantuml-jar-path nil '(#$ . 791) :group 'org-babel :version "24.1" :type 'string)
#@108 Execute a block of plantuml code with org-babel.
This function is called by `org-babel-execute-src-block'.
(defalias 'org-babel-execute:plantuml #[(body params) "\306\307\310\"A\206\n\311!\307\312\"A\206\313\314!\307\315\"A\316\317!\307\320\"A\206+\311-\2047\313\321!\202f\322
\323\324\325-!!\326\n!\327\230\203L\330\202M\311\326\n!\331\230\203Y\332\202Z\311\333\334\335\f!\336\335\n!\260\f.\337-!\204u\313\340-\"\210\f\341\342\343!!/0\344\216r/q\210\3451\346Qc\210)r/q\210\347\350\2110\350\351%\210,\352\353.\"\210\354.\311\"\210.\350\207" [params result-params out-file cmdline in-file java split-string assoc :results "" :file error "PlantUML requires a \":file\" header argument" :cmdline org-babel-temp-file "plantuml-" :java "`org-plantuml-jar-path' is not set" "java " " -jar " shell-quote-argument expand-file-name file-name-extension "svg" " -tsvg" "eps" " -teps" " -p " " < " org-babel-process-file-name " > " file-exists-p "Could not find plantuml.jar at %s" get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n\302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) "@startuml\n" "\n@enduml" write-region nil 0 message "%s" org-babel-eval org-plantuml-jar-path cmd #1# #2=#:temp-file body] 13 (#$ . 942)])
#@61 Return an error because plantuml does not support sessions.
(defalias 'org-babel-prep-session:plantuml #[(session params) "\300\301!\207" [error "Plantuml does not support sessions"] 2 (#$ . 2244)])
(provide 'ob-plantuml)

MMCT - 2023