annotate src/testdir/test_lispindent.vim @ 33776:9503dc55b5ed v9.0.2108

patch 9.0.2108: [security]: overflow with count for :s command Commit: https://github.com/vim/vim/commit/ac63787734fda2e294e477af52b3bd601517fa78 Author: Christian Brabandt <cb@256bit.org> Date: Tue Nov 14 20:45:48 2023 +0100 patch 9.0.2108: [security]: overflow with count for :s command Problem: [security]: overflow with count for :s command Solution: Abort the :s command if the count is too large If the count after the :s command is larger than what fits into a (signed) long variable, abort with e_value_too_large. Adds a test with INT_MAX as count and verify it correctly fails. It seems the return value on Windows using mingw compiler wraps around, so the initial test using :s/./b/9999999999999999999999999990 doesn't fail there, since the count is wrapping around several times and finally is no longer larger than 2147483647. So let's just use 2147483647 in the test, which hopefully will always cause a failure Signed-off-by: Christian Brabandt <cb@256bit.org>
author Christian Brabandt <cb@256bit.org>
date Thu, 16 Nov 2023 22:15:10 +0100
parents 40df8a6515f6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
30805
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1 " Tests for 'lispwords' settings being global-local.
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2 " And other lisp indent stuff.
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
4 set nocompatible viminfo+=nviminfo
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
5
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
6 func Test_global_local_lispwords()
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
7 setglobal lispwords=foo,bar,baz
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
8 setlocal lispwords-=foo | setlocal lispwords+=quux
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
9 call assert_equal('foo,bar,baz', &g:lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
10 call assert_equal('bar,baz,quux', &l:lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
11 call assert_equal('bar,baz,quux', &lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
12
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
13 setlocal lispwords<
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
14 call assert_equal('foo,bar,baz', &g:lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
15 call assert_equal('foo,bar,baz', &l:lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
16 call assert_equal('foo,bar,baz', &lispwords)
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
17 endfunc
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
18
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
19 def Test_lisp_indent()
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
20 enew!
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
21
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
22 append(0, [
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
23 '(defun html-file (base)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
24 '(format nil "~(~A~).html" base))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
25 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
26 '(defmacro page (name title &rest body)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
27 '(let ((ti (gensym)))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
28 '`(with-open-file (*standard-output*',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
29 '(html-file ,name)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
30 ':direction :output',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
31 ':if-exists :supersede)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
32 '(let ((,ti ,title))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
33 '(as title ,ti)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
34 '(with center ',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
35 '(as h2 (string-upcase ,ti)))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
36 '(brs 3)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
37 ',@body))))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
38 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
39 ';;; Utilities for generating links',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
40 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
41 '(defmacro with-link (dest &rest body)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
42 '`(progn',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
43 '(format t "<a href=\"~A\">" (html-file ,dest))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
44 ',@body',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
45 '(princ "</a>")))'
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
46 ])
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
47 assert_equal(7, lispindent(2))
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
48 assert_equal(5, 6->lispindent())
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
49 assert_fails('lispindent(-1)', 'E966: Invalid line number: -1')
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
50
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
51 set lisp
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
52 set lispwords&
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
53 var save_copt = &cpoptions
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
54 set cpoptions+=p
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
55 normal 1G=G
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
56
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
57 assert_equal([
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
58 '(defun html-file (base)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
59 ' (format nil "~(~A~).html" base))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
60 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
61 '(defmacro page (name title &rest body)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
62 ' (let ((ti (gensym)))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
63 ' `(with-open-file (*standard-output*',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
64 ' (html-file ,name)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
65 ' :direction :output',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
66 ' :if-exists :supersede)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
67 ' (let ((,ti ,title))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
68 ' (as title ,ti)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
69 ' (with center ',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
70 ' (as h2 (string-upcase ,ti)))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
71 ' (brs 3)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
72 ' ,@body))))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
73 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
74 ';;; Utilities for generating links',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
75 '',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
76 '(defmacro with-link (dest &rest body)',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
77 ' `(progn',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
78 ' (format t "<a href=\"~A\">" (html-file ,dest))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
79 ' ,@body',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
80 ' (princ "</a>")))',
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
81 ''
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
82 ], getline(1, "$"))
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
83
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
84 enew!
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
85 &cpoptions = save_copt
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
86 set nolisp
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
87 enddef
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
88
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
89 func Test_lispindent_negative()
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
90 " in legacy script there is no error
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
91 call assert_equal(-1, lispindent(-1))
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
92 endfunc
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
93
30839
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
94 func Test_lispindent_with_indentexpr()
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
95 enew
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
96 setl ai lisp nocin indentexpr=11
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
97 exe "normal a(x\<CR>1\<CR>2)\<Esc>"
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
98 let expected = ['(x', ' 1', ' 2)']
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
99 call assert_equal(expected, getline(1, 3))
30853
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
100 " with Lisp indenting the first line is not indented
30839
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
101 normal 1G=G
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
102 call assert_equal(expected, getline(1, 3))
30853
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
103
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
104 %del
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
105 setl lispoptions=expr:1 indentexpr=5
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
106 exe "normal a(x\<CR>1\<CR>2)\<Esc>"
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
107 let expected_expr = ['(x', ' 1', ' 2)']
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
108 call assert_equal(expected_expr, getline(1, 3))
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
109 normal 2G2<<=G
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
110 call assert_equal(expected_expr, getline(1, 3))
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
111
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
112 setl lispoptions=expr:0
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
113 " with Lisp indenting the first line is not indented
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
114 normal 1G3<<=G
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
115 call assert_equal(expected, getline(1, 3))
40df8a6515f6 patch 9.0.0761: cannot use 'indentexpr' for Lisp indenting
Bram Moolenaar <Bram@vim.org>
parents: 30839
diff changeset
116
30839
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
117 bwipe!
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
118 endfunc
942f1b3bc694 patch 9.0.0754: 'indentexpr' overrules lisp indenting in one situation
Bram Moolenaar <Bram@vim.org>
parents: 30805
diff changeset
119
30805
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
120 func Test_lisp_indent_works()
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
121 " This was reading beyond the end of the line
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
122 new
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
123 exe "norm a\tü(\<CR>="
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
124 set lisp
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
125 norm ==
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
126 bwipe!
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
127 endfunc
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
128
4edfa418f8ba patch 9.0.0737: Lisp word only recognized when a space follows
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
129 " vim: shiftwidth=2 sts=2 expandtab