Merge branch 'origin-maint'

This commit is contained in:
Eric Schulte 2012-01-27 16:17:37 -07:00
commit 25019d8147
1 changed files with 2 additions and 2 deletions

View File

@ -191,8 +191,8 @@ Returns non-nil if match-data set"
(first-line-p (= 1 (line-number-at-pos)))
(orig (point)))
(let ((search-for (cond ((and src-at-0-p first-line-p "src_"))
(first-line-p "[ \t]src_")
(t "[ \f\t\n\r\v]src_")))
(first-line-p "[( \t]src_")
(t "[( \f\t\n\r\v]src_")))
(lower-limit (if first-line-p
nil
(- (point-at-bol) 1))))