double-clicking on closing paren - wrong region marked

[David Reitter]

Enter the below text into a vanilla buffer. It consists of a rather  
long expression (3415 characters, I believe), which is all in one  
line (rather than nicely formatted). Add a few extra lines to the  
expression.

Then double-click on the last closing paren ). The wrong region will  
be marked - I get a region from the paren to the end of the buffer,  
or a region from somewhere within the expression to the end. It  
appears to interact with the position of the paren inside the window  
- i.e. whether you scroll up or down a bit does matter. The wrong  
region usually ends at the position where the mouse cursor is _after  
scrolling.

Reproducible in vanilla CVS Emacs 22 (Carbon).

 '(smart-frame-prior-positions (quote  
(("customizations.el.dr" (left . 5) (top . 87) (width . 80) (height .  
40)) ("customizations.el" (left . 633) (top . 67) (width . 80)  
(height . 40)) ("scroll-bar.el.gz" (left . 25) (top . 67) (width .  
80) (height . 43)) ("aquamacs-frame-setup.el" (left . 633) (top . 47)  
(width . 80) (height . 43)) ("mailme-new.pl" (left . 616) (top . 47)  
(width . 80) (height . 43)) ("mailme.pl" (left . 45) (top . 47))  
("macfns.c" (left . 684) (top . 43) (width . 80) (height . 43))  
("toolbar-png.patch" (left . 5) (top . 64) (width . 80) (height .  
43)) ("available-screen.patch" (left . 529) (top . 44) (width . 80)  
(height . 43)) (".emacs" (left . 632) (top . 28) (width . 80)  
(height . 43)) ("aquamacs.el" (left . 24) (top . 48) (width . 80)  
(height . 43)) (".htaccess" (left . 489) (top . 444))  
("nightlies.shtml" (left . 5) (top . 77) (width . 80) (height . 43))  
("thankyou.html" (left . 5) (top . 77) (width . 80) (height . 43))  
("download.shtml" (left . 616) (top . 67) (width . 80) (height . 43))  
("downloads.cache" (left . 5) (top . 77) (width . 80) (height . 43))  
("support.shtml" (left . 5) (top . 77) (width . 80) (height . 43))  
("features.html" (left . 5) (top . 77) (width . 80) (height . 43))  
("documentation.html" (left . 616) (top . 67) (width . 80) (height .  
43)) ("development.html" (left . 5) (top . 77)) ("latex.html" (left .  
5) (top . 67) (width . 80) (height . 43)) ("index.shtml" (left . 5)  
(top . 67) (width . 80) (height . 43)) ("donations.shtml" (left . 45)  
(top . 47) (width . 80) (height . 43)) ("frame.el.gz" (left . 604)  
(top . 71) (width . 80) (height . 43)) ("simple.el.gz" (left . 87)  
(top . 109)) ("itm_style.css" (left . 237) (top . 46) (width . 99)  
(height . 46)) ("index.en.html" (left . 5) (top . 60) (width . 80)  
(height . 43)) ("templates/index.en.html" (left . 640) (top . 60)  
(width . 77) (height . 43)) ("index.html" (left . 32) (top . 80)  
(width . 80) (height . 43)) ("syn-priming.tex" (left . 5) (top . 59)  
(width . 80) (height . 43)) ("CHANGELOG" (left . 24) (top . 28))  
("cua-base.el" (left . 641) (top . 120) (width . 80) (height . 43))  
("pc-select.el.gz" (left . -655) (top . -64) (width . 80) (height .  
43)) ("pager.el" (left . 33) (top . 179) (width . 80) (height . 43))  
("cmds.c" (left . 33) (top . 120) (width . 80) (height . 43)) ("hlt- 
naacl06.tex" (left . 24) (top . 28) (width . 80) (height . 43))  
("custom.el.gz" (left . 5) (top . 67)) ("itm.pl" (left . 5) (top .  
45) (width . 80) (height . 40)) ("stats2.R" (left . 45) (top . 25)  
(width . 158) (height . 39)) ("TODO" (left . 616) (top . 25) (width .  
80) (height . 40)) ("find-repetitions.py" (left . 62) (top . 42)  
(width . 170) (height . 41)) ("parse-maptask.py" (left . 25) (top .  
45) (width . 132) (height . 40)) ("find-repetitions." (left . 633)  
(top . 25) (width . 78) (height . 40)) ("testimonials.txt" (left . 5)  
(top . 67) (width . 80) (height . 40)) ("backup-HD-to-Space" (left .  
616) (top . 47) (width . 80) (height . 40))  
("backup_excludes_users.txt" (left . 616) (top . 47) (width . 80)  
(height . 40)) ("backup_excludes.txt" (left . 209) (top . 56)  
(width . 80) (height . 40)) ("aquamacs-menu.el" (left . 633) (top .  
67) (width . 80) (height . 38)) ("mac-extra-functions.el" (left .  
633) (top . 47) (width . 80) (height . 40)) ("thesis- 
plan.tex" (left . 633) (top . 67) (width . 80) (height . 40))  
("osx_defaults.el" (left . 25) (top . 67) (width . 80) (height .  
40)))) t)



In GNU Emacs 22.0.94.1 (powerpc-apple-darwin7.9.0, Carbon Version 1.6.0)
 of 2007-03-02 on rodrigues.inf.ed.ac.uk - Aquamacs Distribution 1.0rc1
X server distributor `Apple Computers', version 10.4.8
configured using `configure  '--without-x' '--prefix=/usr/local''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: iso-8859-1
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  smart-frame-positioning-mode: t
  aquamacs-styles-mode: t
  recentf-mode: t
  emulate-mac-german-keyboard-mode: t
  encoded-kbd-mode: t
  osx-key-mode: t
  delete-selection-mode: t
  pc-selection-mode: t
  cua-mode: t
  tooltip-mode: t
  mac-input-method-mode: t
  tool-bar-mode: 0
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<down> <down> <down> <down> <down> <down> <down> <down>
C-x C-f <up> <up> <return> <end> <prior> <next> <next>
<prior> <prior> <end> <down-mouse-1> <mouse-1> <double-down-mouse-1>
<double-drag-mouse-1> <down-mouse-1> <drag-mouse-1>
<down-mouse-1> <mouse-1> <down-mouse-1> <mouse-1> <double-down-mouse-1>
<double-drag-mouse-1> <down-mouse-1> <mouse-1> <double-down-mouse-1>
<double-drag-mouse-1> <down-mouse-1> <mouse-1> <down-mouse-1>
<mouse-1> <double-down-mouse-1> <double-drag-mouse-1>
<down-mouse-1> <mouse-1> <down-mouse-1> <mouse-movement>
<mouse-1> <double-down-mouse-1> <double-drag-mouse-1>
<down-mouse-1> <mouse-1> <help-echo> <wheel-up> <double-wheel-up>
<triple-wheel-up> <triple-wheel-up> <triple-wheel-up>
<triple-wheel-up> <wheel-up> <double-wheel-up> <down-mouse-1>
<mouse-1> <double-down-mouse-1> <double-mouse-1> <down-mouse-1>
<mouse-1> <wheel-down> <double-wheel-down> <triple-wheel-down>
<triple-wheel-down> <triple-wheel-down> <triple-wheel-down>
<down-mouse-1> <mouse-1> <double-down-mouse-1> <double-drag-mouse-1>
<down-mouse-1> <mouse-1> <wheel-down> <double-wheel-down>
<triple-wheel-down> <triple-wheel-down> <triple-wheel-down>
<down-mouse-1> <mouse-1> <double-down-mouse-1> <double-drag-mouse-1>
<down-mouse-1> <mouse-1> <down-mouse-1> <mouse-movement>
<mouse-movement> <drag-mouse-1> A-c A-c <help-echo>
A-c <menu-bar> <help-menu> <report-emacs-bug>

Recent messages:
Mark saved where search started
Mark set [2 times]
Mark saved where search started [2 times]
Mark set
Making completion list...
Loading vc-cvs...done
Mark set
Mark saved where search started [2 times]
Mark set [5 times]
Loading emacsbug...done