[O] [PATCH] ox.el: Slovenian translations for exporting

2017-02-03 Thread Martin Vuk 
I would like to propose Slovenian translations for exporting orgmode 
documents. Patch is attached.


Best Regards,

Martin Vuk

>From 0b22387d519201174a562fe07832354619dea6e1 Mon Sep 17 00:00:00 2001
From: Martin Vuk 
Date: Fri, 3 Feb 2017 12:05:50 +0100
Subject: [PATCH] ox.el: Slovenian translations for exporting
To: emacs-orgmode@gnu.org

* lisp/ox.el (org-export-dictionary): Slovenian translations.

* lisp/ox.el (org-export-smart-quotes-alist): Slovenian quotes and
apostrophes for exporting documents.

TINYCHANGE
---
 lisp/ox.el | 45 +++--
 1 file changed, 39 insertions(+), 6 deletions(-)

diff --git a/lisp/ox.el b/lisp/ox.el
index 93f4437..3aeb56b 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -5399,6 +5399,17 @@ Return a list of src-block elements with a caption."
  (secondary-closing
   :utf-8 "“" :html "“" :latex "\\grqq{}" :texinfo "@quotedblleft{}")
  (apostrophe :utf-8 "’" :html: "'"))
+("sl"
+ ;; based on https://sl.wikipedia.org/wiki/Narekovaj
+ (primary-opening :utf-8 "«" :html "«" :latex "{}<<"
+		  :texinfo "@guillemetleft{}")
+ (primary-closing :utf-8 "»" :html "»" :latex ">>{}"
+		  :texinfo "@guillemetright{}")
+ (secondary-opening
+  :utf-8 "„" :html "„" :latex "\\glqq{}" :texinfo "@quotedblbase{}")
+ (secondary-closing
+  :utf-8 "“" :html "“" :latex "\\grqq{}" :texinfo "@quotedblleft{}")
+ (apostrophe :utf-8 "’" :html "’"))
 ("sv"
  ;; based on https://sv.wikipedia.org/wiki/Citattecken
  (primary-opening :utf-8 "”" :html "”" :latex "’’" :texinfo "’’")
@@ -5637,6 +5648,7 @@ them."
  ("pl" :default "Autor")
  ("pt_BR" :default "Autor")
  ("ru" :html "Автор" :utf-8 "Автор")
+ ("sl" :default "Avtor")
  ("sv" :html "Författare")
  ("uk" :html "Автор" :utf-8 "Автор")
  ("zh-CN" :html "作者" :utf-8 "作者")
@@ -5651,7 +5663,8 @@ them."
  ("nl" :default "Vervolg van vorige pagina")
  ("pt" :default "Continuação da página anterior")
  ("ru" :html "(Продолжение)"
-  :utf-8 "(Продолжение)"))
+  :utf-8 "(Продолжение)")
+ ("sl" :default "Nadaljevanje s prejšnje strani"))
 ("Continued on next page"
  ("ar" :default "التتمة في الصفحة التالية")
  ("de" :default "Fortsetzung nächste Seite")
@@ -5662,7 +5675,10 @@ them."
  ("nl" :default "Vervolg op volgende pagina")
  ("pt" :default "Continua na página seguinte")
  ("ru" :html "(Продолжение следует)"
-  :utf-8 "(Продолжение следует)"))
+  :utf-8 "(Продолжение следует)")
+ ("sl" :default "Nadaljevanje na naslednji strani"))
+("Created"
+ ("sl" :default "Ustvarjeno"))
 ("Date"
  ("ar" :default "بتاريخ")
  ("ca" :default "Data")
@@ -5684,6 +5700,7 @@ them."
  ("pl" :default "Data")
  ("pt_BR" :default "Data")
  ("ru" :html "Дата" :utf-8 "Дата")
+ ("sl" :default "Datum")
  ("sv" :default "Datum")
  ("uk" :html "Дата" :utf-8 "Дата")
  ("zh-CN" :html "日期" :utf-8 "日期")
@@ -5703,6 +5720,7 @@ them."
  ("pt_BR" :html "Equação" :default "Equação" :ascii "Equacao")
  ("ru" :html "Уравнение"
   :utf-8 "Уравнение")
+ ("sl" :default "Enačba")
  ("sv" :default "Ekvation")
  ("zh-CN" :html "方程" :utf-8 "方程"))
 ("Figure"
@@ -5734,6 +5752,7 @@ them."
  ("nn" :default "Illustrasjon %d")
  ("pt_BR" :default "Figura %d:")
  ("ru" :html "Рис. %d.:" :utf-8 "Рис. %d.:")
+ ("sl" :default "Slika %d")
  ("sv" :default "Illustration %d")
  ("zh-CN" :html "

[O] Bug: Evaluating octave code with :results verbatim prints table [8.2.10 (8.2.10-35-g19a7d6-elpaplus @ /home/martinv/.emacs.d/elpa/org-plus-contrib-20150330/)]

2015-04-06 Thread Martin Vuk 
If octave code block is evaluated by C-c C-c, the results are 
printed as table even if :results verbatim option is used.

For example this code

#+BEGIN_SRC octave :results verbatim 
[1 2; 3 4]
#+END_SRC

#+RESULTS:
| 1 | 2 |
| 3 | 4 |

should return

#+RESULTS:
 1 2
 3 4

without table delimeters.


Martin Vuk




Emacs  : GNU Emacs 24.4.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.10.8)
 of 2015-04-04 on veliki-picard
Package: Org-mode version 8.2.10 (8.2.10-35-g19a7d6-elpaplus @ 
/home/martinv/.emacs.d/elpa/org-plus-contrib-20150330/)

current state:
==
(setq
 org-tab-first-hook '(org-hide-block-toggle-maybe 
org-src-native-tab-command-maybe org-babel-hide-result-toggle-maybe 
org-babel-header-arg-expand)
 org-speed-command-hook '(org-speed-command-default-hook 
org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-html-format-drawer-function '(lambda (name contents) contents)
 org-latex-format-inlinetask-function 'ignore
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-support-shift-select 'always
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-default-notes-file "~/org/notes.org"
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-latex-format-drawer-function '(lambda (name contents) contents)
 org-from-is-user-regexp "\\"
 org-src-mode-hook '(org-src-babel-configure-edit-buffer 
org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(org-display-inline-images #[nil "\300\301\302\303\304$\207" 
[org-add-hook change-major-mode-hook org-show-block-all append local] 5]
 #[nil "\300\301\302\303\304$\207" [org-add-hook 
change-major-mode-hook org-babel-show-result-all append local] 5]
 org-babel-result-hide-spec org-babel-hide-all-hashes 
org-journal-update-auto-mode-alist)
 org-ascii-format-drawer-function '(lambda (name contents width) contents)
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point 
org-babel-execute-safely-maybe)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers 
org-cycle-hide-inline-tasks org-cycle-show-empty-lines
  org-optimize-window-after-visibility-change)
 org-modules '(org-bbdb org-bibtex org-docview org-gnus org-info org-irc 
org-mhe org-rmail org-w3m org-collector)
 org-babel-tangle-lang-exts '(("julia" . "jl") ("python" . "py") ("emacs-lisp" 
. "el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-babel-after-execute-hook '(org-display-inline-images)
 org-html-format-headline-function 'ignore
 org-babel-load-languages '((python . t) (R . t) (octave . t) (dot . t) (julia 
. t))
 org-html-format-inlinetask-function 'ignore
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-confirm-babel-evaluate nil
 org-src-fontify-natively t
 )