Permalink
Browse files

Fixed bug with marking nested pairs

 - when the left parens were snuggled: ((a b) c)
  • Loading branch information...
magnars committed Feb 4, 2012
1 parent 6e7be12 commit 48feb3b48f7a28faafc9463c93f75a3c642f00f0
Showing with 8 additions and 8 deletions.
  1. +1 −1 autotest.watchr
  2. +1 −1 expand-region.el
  3. +6 −6 features/mark-pairs.feature
View
@@ -12,7 +12,7 @@ def run_all_tests
end
run_all_tests
-watch('.*.feature') { run_all_tests }
+watch('.*.(feature|el)') { run_all_tests }
# Ctrl-\
Signal.trap 'QUIT' do
View
@@ -345,7 +345,7 @@ period and marks next symbol."
"Is point looking at a pair that is entirely marked?"
(and (er--looking-at-pair)
(use-region-p)
- (eq (mark)
+ (>= (mark)
(save-excursion
(forward-list)
(point)))))
@@ -45,9 +45,9 @@ Feature: Mark pairs
And I expand the region 3 times
Then the region should be "(some (more parens))"
-# Scenario: Mark outer parent in nested pairs (leftie)
-# Given there is no region selected
-# When I insert "... ((some more) parens) ..."
-# And I go to point "6"
-# And I expand the region 3 times
-# Then the region should be "((some more) parens)"
+ Scenario: Mark outer parent in nested pairs (leftie)
+ Given there is no region selected
+ When I insert "... ((some more) parens) ..."
+ And I go to point "6"
+ And I expand the region 3 times
+ Then the region should be "((some more) parens)"

0 comments on commit 48feb3b

Please sign in to comment.