浏览代码

safer equality test in org-babel-header-arg-expand

* lisp/ob.el (org-babel-header-arg-expand): In new
  buffers (char-before) may return nil so use equal rather than =.
Eric Schulte 13 年之前
父节点
当前提交
bc473299f1
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/ob.el

+ 1 - 1
lisp/ob.el

@@ -693,7 +693,7 @@ arguments and pop open the results in a preview buffer."
 ;; Add support for completing-read insertion of header arguments after ":"
 (defun org-babel-header-arg-expand ()
   "Call `org-babel-enter-header-arg-w-completion' in appropriate contexts."
-  (when (and (= (char-before) ?\:) (org-babel-where-is-src-block-head))
+  (when (and (equal (char-before) ?\:) (org-babel-where-is-src-block-head))
     (org-babel-enter-header-arg-w-completion (match-string 2))))
 
 (defun org-babel-enter-header-arg-w-completion (&optional lang)