Преглед изворни кода

Fix to test-org-babel/org-babel-get-inline-src-block-matches. * testing/lisp/test-ob.el: Character position offset -=2 to account for removal of trailing spaces

Martyn Jago пре 13 година
родитељ
комит
d270cfcf74
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      testing/lisp/test-ob.el

+ 1 - 1
testing/lisp/test-ob.el

@@ -177,7 +177,7 @@
     (let ((test-point (point)))
       (should (fboundp 'org-babel-get-inline-src-block-matches))
       (should (re-search-forward "src_" nil t)) ;; 1
-      (should (= (+ test-point 140) (match-end 0)))
+      (should (= (+ test-point 138) (match-end 0)))
       (should (org-babel-get-inline-src-block-matches))
       (should (re-search-forward "}" nil (point-at-bol))) ;; 1
       (should-not (org-babel-get-inline-src-block-matches))