From c7092b796d2ce10ea3adb2a80f8ac8d3e6b902d4 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 26 Feb 2013 17:57:13 +0100 Subject: [PATCH] Remove :version keyword in non-emacs libraries --- contrib/babel/langs/ob-eukleides.el | 11 ++++------- contrib/lisp/org-eval.el | 3 +-- contrib/lisp/org-track.el | 1 - contrib/lisp/ox-koma-letter.el | 3 +-- contrib/lisp/ox-taskjuggler.el | 10 ---------- 5 files changed, 6 insertions(+), 22 deletions(-) diff --git a/contrib/babel/langs/ob-eukleides.el b/contrib/babel/langs/ob-eukleides.el index 36e591aea..98c9039f9 100644 --- a/contrib/babel/langs/ob-eukleides.el +++ b/contrib/babel/langs/ob-eukleides.el @@ -44,10 +44,8 @@ (defcustom org-eukleides-path nil "Path to the eukleides executable file." :group 'org-babel - :version "24.1" :type 'string) - (defcustom org-eukleides-eps-to-raster nil "Command used to convert EPS to raster. Nil for no conversion." :group 'org-babel @@ -57,7 +55,6 @@ (const :tag "NetPNM" "a=%s;b=%s;pstopnm -stdout ${a} | pnmtopng > ${b}" ) (const :tag "None" nil))) - (defun org-babel-execute:eukleides (body params) "Execute a block of eukleides code with org-babel. This function is called by `org-babel-execute-src-block'." @@ -71,17 +68,17 @@ This function is called by `org-babel-execute-src-block'." (error "`org-eukleides-path' is not set") (concat (expand-file-name org-eukleides-path) " -b --output=" - (org-babel-process-file-name - (concat + (org-babel-process-file-name + (concat (file-name-sans-extension out-file) ".eps")) " " (org-babel-process-file-name in-file))))) (unless (file-exists-p org-eukleides-path) (error "Could not find eukleides at %s" org-eukleides-path)) - + (if (string= (file-name-extension out-file) "png") (if org-eukleides-eps-to-raster - (shell-command (format org-eukleides-eps-to-raster + (shell-command (format org-eukleides-eps-to-raster (concat (file-name-sans-extension out-file) ".eps") (concat (file-name-sans-extension out-file) ".png"))) (error "Conversion to PNG not supported. use a file with an EPS name"))) diff --git a/contrib/lisp/org-eval.el b/contrib/lisp/org-eval.el index dd3f9f57c..62dd9b513 100644 --- a/contrib/lisp/org-eval.el +++ b/contrib/lisp/org-eval.el @@ -88,8 +88,7 @@ (:foreground "yellow")))) "Face for command output that is included into an Org-mode buffer." :group 'org-eval - :group 'org-faces - :version "22.1") + :group 'org-faces) (defvar org-eval-regexp nil) diff --git a/contrib/lisp/org-track.el b/contrib/lisp/org-track.el index a44472e38..9996a3de0 100644 --- a/contrib/lisp/org-track.el +++ b/contrib/lisp/org-track.el @@ -69,7 +69,6 @@ unpack it into that directory (i.e. a subdirectory sources. All you'll have to do is call `M-x org-track-update' from time to time." - :version "22.1" :group 'org) (defcustom org-track-directory (concat user-emacs-directory "org/lisp") diff --git a/contrib/lisp/ox-koma-letter.el b/contrib/lisp/ox-koma-letter.el index 07633e371..0751fd54c 100644 --- a/contrib/lisp/ox-koma-letter.el +++ b/contrib/lisp/ox-koma-letter.el @@ -73,8 +73,7 @@ (defgroup org-export-koma-letter nil "Options for exporting to KOMA scrlttr2 class in LaTeX export." :tag "Org Koma-Letter" - :group 'org-export - :version "24.2") + :group 'org-export) (defcustom org-koma-letter-class-option-file "NF" "Letter Class Option File." diff --git a/contrib/lisp/ox-taskjuggler.el b/contrib/lisp/ox-taskjuggler.el index b070499ed..1ef649303 100644 --- a/contrib/lisp/ox-taskjuggler.el +++ b/contrib/lisp/ox-taskjuggler.el @@ -159,7 +159,6 @@ (defcustom org-taskjuggler-extension ".tjp" "Extension of TaskJuggler files." :group 'org-export-taskjuggler - :version "24.2" :type 'string) (defcustom org-taskjuggler-project-tag "taskjuggler_project" @@ -167,7 +166,6 @@ This tag is used to find the tree containing all the tasks for the project." :group 'org-export-taskjuggler - :version "24.2" :type 'string) (defcustom org-taskjuggler-resource-tag "taskjuggler_resource" @@ -175,7 +173,6 @@ the project." This tag is used to find the tree containing all the resources for the project." :group 'org-export-taskjuggler - :version "24.2" :type 'string) (defcustom org-taskjuggler-report-tag "taskjuggler_report" @@ -183,13 +180,11 @@ for the project." This tag is used to find the tree containing all the reports for the project." :group 'org-export-taskjuggler - :version "24.2" :type 'string) (defcustom org-taskjuggler-target-version 2.4 "Which version of TaskJuggler the exporter is targeting." :group 'org-export-taskjuggler - :version "24.2" :type 'number) (defcustom org-taskjuggler-default-project-version "1.0" @@ -197,7 +192,6 @@ the project." This value can also be set with the \":VERSION:\" property associated to the headline defining the project." :group 'org-export-taskjuggler - :version "24.2" :type 'string) (defcustom org-taskjuggler-default-project-duration 280 @@ -206,7 +200,6 @@ The value will be used if no start and end date have been defined in the root node of the task tree, i.e. the tree that has been marked with `org-taskjuggler-project-tag'" :group 'org-export-taskjuggler - :version "24.2" :type 'integer) (defcustom org-taskjuggler-default-reports @@ -226,7 +219,6 @@ marked with `org-taskjuggler-project-tag'" }") "Default reports for the project." :group 'org-export-taskjuggler - :version "24.2" :type '(repeat (string :tag "Report"))) (defcustom org-taskjuggler-default-global-header "" @@ -234,7 +226,6 @@ marked with `org-taskjuggler-project-tag'" This goes before project declaration, and might be useful for early macros." :group 'org-export-taskjuggler - :version "24.2" :type '(string :tag "Preamble")) (defcustom org-taskjuggler-default-global-properties @@ -252,7 +243,6 @@ could for example include another TaskJuggler file. The global properties are inserted after the project declaration but before any resource and task declarations." :group 'org-export-taskjuggler - :version "24.2" :type '(string :tag "Preamble")) (defcustom org-taskjuggler-valid-task-attributes