From 42891ea9d9689c60061db912d692d59eef84e6d2 Mon Sep 17 00:00:00 2001 From: Julian Mehne Date: Sat, 6 Dec 2014 02:52:35 +0100 Subject: Make migrated test33 more similar to old legacy test. Remove `expandtab` and add a missing trailing space from the legacy test. --- test/functional/legacy/033_lisp_indent_spec.lua | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/test/functional/legacy/033_lisp_indent_spec.lua b/test/functional/legacy/033_lisp_indent_spec.lua index 3ee248815d..0a5577fad3 100644 --- a/test/functional/legacy/033_lisp_indent_spec.lua +++ b/test/functional/legacy/033_lisp_indent_spec.lua @@ -22,7 +22,7 @@ describe('lisp indent', function() :if-exists :supersede) (let ((,ti ,title)) (as title ,ti) - (with center + (with center (as h2 (string-upcase ,ti))) (brs 3) ,@body)))) @@ -35,7 +35,7 @@ describe('lisp indent', function() ,@body (princ "")))]]) - execute('set lisp expandtab') + execute('set lisp') execute('/^(defun') feed('=G:/^(defun/,$yank A') @@ -52,15 +52,15 @@ describe('lisp indent', function() (defmacro page (name title &rest body) (let ((ti (gensym))) `(with-open-file (*standard-output* - (html-file ,name) - :direction :output - :if-exists :supersede) + (html-file ,name) + :direction :output + :if-exists :supersede) (let ((,ti ,title)) - (as title ,ti) - (with center - (as h2 (string-upcase ,ti))) - (brs 3) - ,@body)))) + (as title ,ti) + (with center + (as h2 (string-upcase ,ti))) + (brs 3) + ,@body)))) ;;; Utilities for generating links -- cgit