forked from odyssomay/paredit
-
Notifications
You must be signed in to change notification settings - Fork 0
/
deleting_killing.py
184 lines (149 loc) · 4.93 KB
/
deleting_killing.py
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
import sublime, sublime_plugin
try:
from paredit import shared
except:
import shared
def strict_delete_selection(view, edit, region):
replace_char = str(chr(1))
point = region.begin()
while point < region.end():
(a, b) = shared.get_next_expression(view, point, True)
if a and b:
if shared.is_inside_word(view.substr(a)):
if a > region.end():
break
a = max(a, region.begin())
b = min(b, region.end())
if b > region.end():
break
if not a < region.begin():
view.replace(edit, sublime.Region(a, b), replace_char * (b - a))
point = b
else:
break
view.replace(edit, region, view.substr(region).replace(replace_char, "").strip())
return region.begin()
def remove_empty_expression(view, edit, point, fail_direction):
(lb, rb) = shared.get_expression(view, point)
if lb and rb:
expr_region = sublime.Region(lb, rb)
expression = view.substr(expr_region)
if shared.is_expression_empty(expression):
return shared.erase_region(view, edit, expr_region)
else:
return sublime.Region(point + fail_direction, point + fail_direction)
else:
return point
def standard_delete(view, edit, point, is_forward):
if is_forward:
view.erase(edit, sublime.Region(point, point + 1))
return point
else:
view.erase(edit, sublime.Region(point - 1, point))
return max(0, point - 1)
def paredit_delete(view, edit, is_forward):
def f(region):
if not region.begin() == region.end():
if shared.is_strict_mode():
return strict_delete_selection(view, edit, region)
else:
return shared.erase_region(view, edit, region)
point = region.begin()
if is_forward:
direction = 1
next_char = view.substr(point)
skip_char_type = "lbracket"
else:
direction = -1
next_char = view.substr(point - 1)
skip_char_type = "rbracket"
next_char_type = shared.char_type(next_char)
if shared.is_inside_comment(view, point):
pass # pass to else below
elif next_char_type == "string":
if shared.is_inside_string(view, point):
if ((not is_forward) and
(point - 2 >= 0) and
view.substr(point - 2) == "\\"):
return shared.erase_region(view, edit, sublime.Region(point, point - 2))
else:
return remove_empty_expression(view, edit, point, direction)
else:
return region.begin() + direction
elif shared.is_inside_string(view, point):
# Same purpose as is_inside_comment above
# but has to be tested after the elif above.
if (is_forward and
(point + 2 < view.size()) and
view.substr(sublime.Region(point, point + 2)) == "\\\""):
return shared.erase_region(
view, edit, sublime.Region(point, point + 2))
else:
pass
elif next_char_type == skip_char_type: return region.begin() + direction
elif next_char_type:
return remove_empty_expression(view, edit, point, direction)
# else
return standard_delete(view, edit, point, is_forward)
shared.edit_selections(view, f)
def paredit_forward_delete(view, edit):
paredit_delete(view, edit, True)
def paredit_backward_delete(view, edit):
paredit_delete(view, edit, False)
def paredit_kill_abstract(view, edit, expression):
def f(region):
if not region.a == region.b:
return shared.erase_region(view, edit, region)
point = region.a
(lb, rb) = shared.get_expression(view, point)
if lb and rb:
if expression:
view.erase(edit, sublime.Region(lb + 1, rb - 1))
return lb + 1
else:
view.erase(edit, sublime.Region(point, rb - 1))
return point
else:
return point
shared.edit_selections(view, f)
def paredit_kill(view, edit):
paredit_kill_abstract(view, edit, False)
def paredit_kill_expression(view, edit):
paredit_kill_abstract(view, edit, True)
def paredit_kill_word(view, edit, is_forward):
def f(region):
if not region.a == region.b:
return region
point = region.a
if is_forward:
(lw, rw) = shared.get_next_word(view, point)
else:
(lw, rw) = shared.get_previous_word(view, point)
if lw and rw:
return shared.erase_region(view, edit, sublime.Region(lw, rw))
return region
shared.edit_selections(view, f)
def paredit_forward_kill_word(view, edit):
paredit_kill_word(view, edit, True)
def paredit_backward_kill_word(view, edit):
paredit_kill_word(view, edit, False)
####
#### Commands
class Paredit_forward_deleteCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_forward_delete(self.view, edit)
class Paredit_backward_deleteCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_backward_delete(self.view, edit)
class Paredit_killCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_kill(self.view, edit)
class Paredit_kill_expressionCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_kill_expression(self.view, edit)
class Paredit_forward_kill_wordCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_forward_kill_word(self.view, edit)
class Paredit_backward_kill_wordCommand(sublime_plugin.TextCommand):
def run(self, edit):
paredit_backward_kill_word(self.view, edit)