Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
47c88c06
Commit
47c88c06
authored
Mar 30, 2010
by
Juri Linkov
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* replace.el (occur-accumulate-lines): Fix a bug where the first
context line at the beginning of the buffer was missing.
parent
3580374b
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
4 deletions
+9
-4
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/replace.el
lisp/replace.el
+4
-4
No files found.
lisp/ChangeLog
View file @
47c88c06
2010-03-30 Juri Linkov <juri@jurta.org>
* replace.el (occur-accumulate-lines): Fix a bug where the first
context line at the beginning of the buffer was missing.
2010-03-30 Eli Zaretskii <eliz@gnu.org>
* files.el: Make bidi-display-reordering safe variable for boolean
...
...
lisp/replace.el
View file @
47c88c06
...
...
@@ -1008,16 +1008,16 @@ which means to discard all text properties."
(
defun
occur-accumulate-lines
(
count
&optional
keep-props
)
(
save-excursion
(
let
((
forwardp
(
>
count
0
))
result
beg
end
)
result
beg
end
moved
)
(
while
(
not
(
or
(
zerop
count
)
(
if
forwardp
(
eobp
)
(
bobp
))))
(
and
(
bobp
)
(
not
moved
)
))))
(
setq
count
(
+
count
(
if
forwardp
-1
1
)))
(
setq
beg
(
line-beginning-position
)
end
(
line-end-position
))
(
push
(
occur-engine-line
beg
end
keep-props
)
result
)
(
forward-line
(
if
forwardp
1
-1
)))
(
setq
moved
(
=
0
(
forward-line
(
if
forwardp
1
-1
)))
))
(
nreverse
result
))))
(
defun
occur-read-primary-args
()
...
...
@@ -1028,7 +1028,7 @@ which means to discard all text properties."
(
defun
occur-rename-buffer
(
&optional
unique-p
interactive-p
)
"Rename the current *Occur* buffer to *Occur: original-buffer-name*.
Here `original-buffer-name' is the buffer name were Occur was originally run.
Here `original-buffer-name' is the buffer name w
h
ere Occur was originally run.
When given the prefix argument, or called non-interactively, the renaming
will not clobber the existing buffer(s) of that name, but use
`generate-new-buffer-name' instead. You can add this to `occur-hook'
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment