소스 검색

code blocks default to only exporting code

Eric Schulte 17 년 전
부모
커밋
e140849b49
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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))