Explorar o código

code blocks default to only exporting code

Eric Schulte %!s(int64=16) %!d(string=hai) anos
pai
achega
e140849b49
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      litorgy/litorgy-exp.el

+ 1 - 1
litorgy/litorgy-exp.el

@@ -69,7 +69,7 @@ options and are taken from `litorgy-inline-header-args'."
         (replace-match replacement t t)))))
 
 (defun litorgy-exp-do-export (lang body params &optional inline)
-  (case (intern (or (cdr (assoc :exports params)) "both"))
+  (case (intern (or (cdr (assoc :exports params)) "code"))
           ('none "")
           ('code (litorgy-exp-code body lang params inline))
           ('results (litorgy-exp-results body lang params inline))