Modified regex for 'expand selection to {...}'

Expanded the regex with ".*$" to allow it to reach end of line of closing brace. eg
  lapply(D, function(x) {
    do_something
   })
So that closing ")" does not get dropped