Fix multiple leading underscores.

Author: Julian

plugin/textobj/variable-segment.vim

@@ -1,6 +1,6 @@
 " textobj-variable-segment: a text object for segments of variable names
 " Author: Julian Berman
-" Version: 0.4.0
+" Version: 0.5.0
 
 if exists('g:loaded_textobj_variable_segment')
     finish
@@ -16,7 +16,7 @@ call textobj#user#plugin('variable', {
 
 
 function! s:select(object_type, right_boundary)
-    let left_boundaries = ['_\i', '\<', '\l\u', '\u\u\ze\l', '\a\d', '\d\a']
+    let left_boundaries = ['_\+\i', '\<', '\l\u', '\u\u\ze\l', '\a\d', '\d\a']
     call search(join(left_boundaries, '\|'), 'bce')
     let start_position = getpos('.')
 

t/variable-segment.vim

@@ -84,6 +84,13 @@ describe 'iv'
         Expect getline(1) == '_howManyCoolThings'
     end
 
+    it 'ignores multiple leading underscores'
+        put! = '__doCoolThings'
+        normal! 3|
+        normal civhowMany
+        Expect getline(1) == '__howManyCoolThings'
+    end
+
     it 'selects leading small camels and does not swap case'
         put! = 'greatQuuxThings'
         normal! 3|
@@ -276,6 +283,13 @@ describe 'av'
         Expect getline(1) == '_doThings'
     end
 
+    it 'ignores multiple leading underscores'
+        put! = '__doCoolThings'
+        normal! 3|
+        normal dav
+        Expect getline(1) == '__coolThings'
+    end
+
     it 'selects leading small camels and swaps case'
         put! = 'greatQuuxThings'
         normal! 3|