diff options
author | David Arroyo Menendez <davidam9@riseup.net> | 2013-11-17 11:54:00 +0100 |
---|---|---|
committer | David Arroyo Menendez <davidam9@riseup.net> | 2013-11-17 11:54:00 +0100 |
commit | 246c8c6637a86d9b66b7ae01672825ab58c35b63 (patch) | |
tree | 792b5d987d27c7c502657b6cb5bdc8f6a7d11f99 | |
parent | d8e149eb76219ea45114cac796db851e452152a3 (diff) | |
download | org-mode-246c8c6637a86d9b66b7ae01672825ab58c35b63.tar.gz |
org-license.el: remove my-org-switch-language function.
-rw-r--r-- | contrib/lisp/org-license.el | 20 |
1 files changed, 2 insertions, 18 deletions
diff --git a/contrib/lisp/org-license.el b/contrib/lisp/org-license.el index b452706..dc6d786 100644 --- a/contrib/lisp/org-license.el +++ b/contrib/lisp/org-license.el @@ -39,24 +39,6 @@ (defvar org-license-images-directory "") -(defun my-org-switch-language () -"Switch language if a `#+LANGUAGE:' Org meta-tag is on top 8 lines." -(save-excursion - (let (lang - (license-alist '(("br" . "brazilian") - ("ca" . "catalan") - ("de" . "deutsch") - ("en" . "american") - ("eo" . "esperanto") - ("eu" . "euskera") - ("es" . "spanish")))) - (when (re-search-backward "#\\+LANGUAGE: +\\([[:alpha:]_]*\\)" 1 t) - (setq lang (match-string 1)) -;; (message lang) - (ispell-change-dictionary (cdr (assoc lang dico-alist))))))) - -(add-hook 'org-mode-hook 'my-org-switch-language) - (defun org-license-cc-by (language) (interactive "MLanguage ( br | ca | de | en | es | eo | eu | fi | fr | gl | it | jp | nl | pt ): " language) (cond ((equal language "br") @@ -521,3 +503,5 @@ Copyright (C) 2013 " user-full-name (org-license-cc-by-nc-nd "nl") (org-license-cc-by-nc-nd "pt") ) + + |