# HG changeset patch # User Bram Moolenaar # Date 1665828003 -7200 # Node ID 942f1b3bc694fde3d87d9a8b1c8a2063163dcbbd # Parent 667e4a093edd65b8751a9303f63ac84a3aa97cd6 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation Commit: https://github.com/vim/vim/commit/a79b35b5781ae770334cec781d17fec3875f8108 Author: Bram Moolenaar Date: Sat Oct 15 10:49:36 2022 +0100 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation Problem: 'indentexpr' overrules lisp indenting in one situation. Solution: Add "else" to keep the lisp indent. (issue https://github.com/vim/vim/issues/11327) diff --git a/src/change.c b/src/change.c --- a/src/change.c +++ b/src/change.c @@ -2269,19 +2269,18 @@ open_line( else vreplace_mode = 0; - // May do lisp indenting. if (!p_paste && leader == NULL && curbuf->b_p_lisp && curbuf->b_p_ai) { + // do lisp indenting fixthisline(get_lisp_indent); ai_col = (colnr_T)getwhitecols_curline(); } - - // May do indenting after opening a new line. - if (do_cindent) + else if (do_cindent) { + // do 'cindent' or 'indentexpr' indenting do_c_expr_indent(); ai_col = (colnr_T)getwhitecols_curline(); } diff --git a/src/testdir/test_lispindent.vim b/src/testdir/test_lispindent.vim --- a/src/testdir/test_lispindent.vim +++ b/src/testdir/test_lispindent.vim @@ -91,6 +91,17 @@ func Test_lispindent_negative() call assert_equal(-1, lispindent(-1)) endfunc +func Test_lispindent_with_indentexpr() + enew + setl ai lisp nocin indentexpr=11 + exe "normal a(x\1\2)\" + let expected = ['(x', ' 1', ' 2)'] + call assert_equal(expected, getline(1, 3)) + normal 1G=G + call assert_equal(expected, getline(1, 3)) + bwipe! +endfunc + func Test_lisp_indent_works() " This was reading beyond the end of the line new diff --git a/src/version.c b/src/version.c --- a/src/version.c +++ b/src/version.c @@ -696,6 +696,8 @@ static char *(features[]) = static int included_patches[] = { /* Add new patch number below this line */ /**/ + 754, +/**/ 753, /**/ 752,