ox-confluence: Add `org-confluence-lang-alist'

* ox-confluence.el (org-confluence-src-block): Add var for mapping
language name.

TINYCHANGE

contrib/lisp/ox-confluence.el

@@ -58,6 +58,11 @@
 		     (template . org-confluence-template)
 		     (underline . org-confluence-underline)))
 
+(defcustom org-confluence-lang-alist
+  '(("sh" . "bash"))
+  "Map from org-babel language name to confluence wiki language name"
+  :type '(alist :key-type string :value-type string))
+
 ;; All the functions we use
 (defun org-confluence-bold (bold contents info)
   (format "*%s*" contents))
@@ -118,8 +123,7 @@ a communication channel."
 (defun org-confluence-src-block (src-block contents info)
   ;; FIXME: provide a user-controlled variable for theme
   (let* ((lang (org-element-property :language src-block))
-         (language (if (string= lang "sh") "bash" ;; FIXME: provide a mapping of some sort
-                     lang))
+         (language (or (cdr (assoc lang org-confluence-lang-alist)) lang))
          (content (org-export-format-code-default src-block info)))
     (org-confluence--block language "Emacs" content)))