summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-index.el
diff options
context:
space:
mode:
authorBill Wohler <wohler@newt.com>2006-01-11 01:49:32 +0000
committerBill Wohler <wohler@newt.com>2006-01-11 01:49:32 +0000
commit8a9b79f0bc2b637d5f8ee792ff0531189b30dee7 (patch)
tree8cc06e4b30547d3ced005249085a4e8af5e17a98 /lisp/mh-e/mh-index.el
parent721893e2e24515d03e5b83c70c768a75df6221f8 (diff)
downloademacs-8a9b79f0bc2b637d5f8ee792ff0531189b30dee7.tar.gz
(mh-index-next-folder): Don't back up a line when going backwards
since this skips the current folder heading if point is on the first message after the folder heading (closes SF #1126188).
Diffstat (limited to 'lisp/mh-e/mh-index.el')
-rw-r--r--lisp/mh-e/mh-index.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mh-e/mh-index.el b/lisp/mh-e/mh-index.el
index 3d0aeba85a6..69ef7ca9c1a 100644
--- a/lisp/mh-e/mh-index.el
+++ b/lisp/mh-e/mh-index.el
@@ -749,7 +749,7 @@ group of results."
(if (null mh-index-data)
(message "Only applicable in an MH-E index search buffer")
(let ((point (point)))
- (forward-line (if backward-flag -1 1))
+ (forward-line (if backward-flag 0 1))
(cond ((if backward-flag
(re-search-backward "^+" (point-min) t)
(re-search-forward "^+" (point-max) t))