浏览代码

Merge branch 'maint'

Bastien Guerry 12 年之前
父节点
当前提交
40fdea9b0d
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/ob-dot.el

+ 2 - 1
lisp/ob-dot.el

@@ -64,7 +64,8 @@
   "Execute a block of Dot code with org-babel.
 This function is called by `org-babel-execute-src-block'."
   (let* ((result-params (cdr (assoc :result-params params)))
-	 (out-file (cdr (assoc :file params)))
+	 (out-file (cdr (or (assoc :file params)
+			    (error "You need to specify a :file parameter"))))
 	 (cmdline (or (cdr (assoc :cmdline params))
 		      (format "-T%s" (file-name-extension out-file))))
 	 (cmd (or (cdr (assoc :cmd params)) "dot"))