bug#19470: 24.4; isearch-occur via global-map

[Tak Kunihiro]

When isearch-occur is called via global-map, buffer exits from
isearch-mode.

0. emacs -Q
1. C-s then type search string
2. M-s o
3. occur buffer shows up with isearch-mode (normal)

0. emacs -Q
1. (define-key isearch-mode-map "\M-so" nil)
2. (define-key global-map "\M-so" 'isearch-occur)
3. C-s then type search string
4. M-s o
5. occur buffer shows up without isearch-mode

I expect isearch-occur responds in the same way.


In GNU Emacs 24.4.1 (i686-pc-mingw32)
 of 2014-10-25 on LEG570
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
 `configure --prefix=/c/usr'

Important settings:
  value of $LANG: ENU
  locale-coding-system: cp932

Major mode: Occur

Minor modes in effect:
  tooltip-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  buffer-read-only: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
C-x C-f ~ / d e l e <tab> b u <tab> <return> C-e C-x 
C-e C-n C-x C-e C-n C-e C-x C-e C-a C-p C-p C-s d e 
f i n e M-s o C-x o q C-s k e y C-c o C-x o M-x b u 
g <tab> <tab> <M-backspace> <backspace> <backspace> 
<backspace> <backspace> r e p o r t <tab> <return>

Recent messages:
For information about GNU Emacs and the GNU system, type C-h C-a.
isearch-occur
nil
isearch-occur
Searched 1 buffer; 3 matches for `define'
Mark saved where search started [2 times]
Searched 1 buffer; 3 matches for `key'
Making completion list...

Load-path shadows:
None found.

Features:
(shadow sort gnus-util mail-extr emacsbug message format-spec rfc822 mml
mml-sec mm-decode mm-bodies mm-encode mail-parse rfc2231 mailabbrev
gmm-utils mailheader sendmail rfc2047 rfc2045 ietf-drums mm-util
help-fns mail-prsvr mail-utils help-mode easymenu misearch multi-isearch
time-date tooltip electric uniquify ediff-hook vc-hooks lisp-float-type
mwheel dos-w32 ls-lisp w32-common-fns disp-table w32-win w32-vars
tool-bar dnd fontset image regexp-opt fringe tabulated-list newcomment
lisp-mode prog-mode register page menu-bar rfn-eshadow timer select
scroll-bar mouse jit-lock font-lock syntax facemenu font-core frame cham
georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao
korean japanese hebrew greek romanian slovak czech european ethiopic
indian cyrillic chinese case-table epa-hook jka-cmpr-hook help simple
abbrev minibuffer nadvice loaddefs button faces cus-face macroexp files
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget hashtable-print-readable backquote make-network-process
w32notify w32 multi-tty emacs)

Memory information:
((conses 8 75927 6178)
 (symbols 32 17553 0)
 (miscs 32 52 192)
 (strings 16 10956 3408)
 (string-bytes 1 278186)
 (vectors 8 9678)
 (vector-slots 4 384873 4856)
 (floats 8 61 393)
 (intervals 28 246 30)
 (buffers 508 15))