From 8e51a88bf07c5ca56908c979919098f237411b35 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Wed, 17 Aug 2016 23:36:32 +0200 Subject: [PATCH] Fix indentation in tests * testing/lisp/test-org-src.el (test-org-src/basic): (test-org-src/empty-block): (test-org-src/blank-line-block): (test-org-src/preserve-tabs): Fix indentation and tab issues. --- testing/lisp/test-org-src.el | 42 +++++++++++++++++++++--------------------- 1 file changed, 21 insertions(+), 21 deletions(-) diff --git a/testing/lisp/test-org-src.el b/testing/lisp/test-org-src.el index 4fd581bbe..bc6ef169d 100644 --- a/testing/lisp/test-org-src.el +++ b/testing/lisp/test-org-src.el @@ -34,7 +34,7 @@ #+end_src " (let ((org-edit-src-content-indentation 2) - (org-src-preserve-indentation nil)) + (org-src-preserve-indentation nil)) (org-edit-special) (insert "blah") (org-edit-src-exit) @@ -66,7 +66,7 @@ #+end_src " (let ((org-edit-src-content-indentation 0) - (org-src-preserve-indentation nil)) + (org-src-preserve-indentation nil)) (org-edit-special) (insert "blah") (org-edit-src-exit) @@ -87,7 +87,7 @@ blah #+end_src " (let ((org-edit-src-content-indentation 2) - (org-src-preserve-indentation nil)) + (org-src-preserve-indentation nil)) (goto-line 2) (org-edit-special) (insert "blah") @@ -104,34 +104,34 @@ blah (should (equal " #+begin_src emacs-lisp - This is a tab: . + This is a tab:\t. #+end_src" - (org-test-with-temp-text - " + (org-test-with-temp-text + " #+begin_src emacs-lisp -This is a tab: . +This is a tab:\t. #+end_src" - (let ((org-edit-src-content-indentation 2) - (org-src-preserve-indentation nil)) - (org-edit-special) - (org-edit-src-exit) - (buffer-string))))) + (let ((org-edit-src-content-indentation 2) + (org-src-preserve-indentation nil)) + (org-edit-special) + (org-edit-src-exit) + (buffer-string))))) ;; With `org-src-preserve-indentation' set to t. (should (equal " #+begin_src emacs-lisp -This is a tab: . +This is a tab:\t. #+end_src" - (org-test-with-temp-text - " + (org-test-with-temp-text + " #+begin_src emacs-lisp -This is a tab: . +This is a tab:\t. #+end_src" - (let ((org-edit-src-content-indentation 2) - (org-src-preserve-indentation t)) - (org-edit-special) - (org-edit-src-exit) - (buffer-string)))))) + (let ((org-edit-src-content-indentation 2) + (org-src-preserve-indentation t)) + (org-edit-special) + (org-edit-src-exit) + (buffer-string)))))) (provide 'test-org-src) ;;; test-org-src.el ends here -- 2.11.4.GIT