From 08bfac66d69ed6ce739d58710f06444b6f43fb94 Mon Sep 17 00:00:00 2001 From: Martyn Jago Date: Sun, 11 Sep 2011 21:17:40 +0100 Subject: [PATCH] Replace left-char with backward-char for backward compatibility * testing/lisp/test-ob.el (test-org-babel/org-babel-get-inline-src-block-matches): --- testing/lisp/test-ob.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el index a78bf1e..3a68328 100644 --- a/testing/lisp/test-ob.el +++ b/testing/lisp/test-ob.el @@ -226,9 +226,9 @@ (should (re-search-forward "echo" nil t)) ;; 2 (should (org-babel-get-inline-src-block-matches)) (should (re-search-forward "blocks" nil t)) ;; 3 - (left-char 8) ;; 3 + (backward-char 8) ;; 3 (should (org-babel-get-inline-src-block-matches)) - (right-char 1) ;;3 + (forward-char 1) ;;3 (should-not (org-babel-get-inline-src-block-matches)) (should (re-search-forward ":results" nil t)) ;; 4 (should (org-babel-get-inline-src-block-matches)) -- 1.7.3.4