From xemacs-m  Wed Apr  2 18:01:54 1997
Received: from newman (root@newman.aventail.com [199.238.236.1])
	by xemacs.org (8.8.5/8.8.5) with SMTP id SAA04181
	for <xemacs-beta@xemacs.org>; Wed, 2 Apr 1997 18:01:53 -0600 (CST)
Received: from kramer.in.aventail.com.aventail.com (wmperry@kramer [192.168.1.12]) by newman (8.6.12/8.6.9) with SMTP id PAA22256; Wed, 2 Apr 1997 15:29:01 -0800
Date: Wed, 2 Apr 1997 15:29:01 -0800
Message-Id: <199704022329.PAA22256@newman>
From: "William M. Perry" <wmperry@aventail.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
To: Steven L Baur <steve@miranova.com>
Cc: xemacs-beta@xemacs.org
Subject: Re: Build success: 20.1b10 w/o patches, Linux 2.0.29
In-Reply-To: <m2bu7x836q.fsf@altair.xemacs.org>
References: <hhu3lq3oc9.fsf@arioch.oche.de>
	<m2u3lqicyg.fsf@altair.xemacs.org>
	<hh4tdqb35t.fsf@arioch.oche.de>
	<m267y6qh4s.fsf@altair.xemacs.org>
	<hhenctmc6l.fsf@arioch.oche.de>
	<m2bu7x836q.fsf@altair.xemacs.org>
X-Mailer: VM 6.22 under 19.15 XEmacs Lucid
Errors-to: wmperry@aventail.com
Reply-to: wmperry@aventail.com
X-Face: O~Rn;(l][/-o1sALg4A@xpE:9-"'IR[%;,,!m7</SYF`{vYQ(&RI1&EiH[FvT;J}@f!4kfz
 x_!Y#=y{Uuj9GvUi=cPuajQ(Z42R[wE@{G,sn$qGr5g/wnb*"*ktI+,CD}1Z'wxrM2ag-r0p5I6\nA
 [WJopW_J.WY;

Steven L Baur writes:
>Carsten Leonhardt <leo@arioch.oche.de> writes:
>> 2. Executing (overlay-lists) [in a buffer without overlays, I guess]
>>    returns "(nil nil)", in GNU Emacs it returns "(nil)".
>
>That's an Emacs bug (at the minimum a doc bug).
>[From 19.34]:
>overlay-lists: a built-in function.
>
>Return a pair of lists giving all the overlays of the current buffer.
>       ^ ^^^ ^^  ^^^^^
>
>(nil) doesn't look like `a pair of lists' to me.  If the doc string is 
>wrong the problem is easily fixed.  Who knows enough about overlays to 
>say what is correct?

  Sure it is!  C'mon steve!  I think the bug is that overlay-lists under
XEmacs is returning a list of lists.  Does this patch help?

(cons nil nil)
==> (nil)
(overlay-lists) ; Emacs 19.34
==> (nil)
(overlay-lists) ; XEmacs 19.15
==> (nil nil)

-Bill P.

*** overlay.el	1997/04/02 23:21:41	1.1
--- overlay.el	1997/04/02 23:21:45
***************
*** 177,183 ****
  		(setq before (append before (list overlay)))
  	      (setq after (append after (list overlay)))))))
       (extent-list))
!     (list before after)))
  
  (defun overlay-recenter (pos)
    "Recenter the overlays of the current buffer around position POS."
--- 177,183 ----
  		(setq before (append before (list overlay)))
  	      (setq after (append after (list overlay)))))))
       (extent-list))
!     (cons before after)))
  
  (defun overlay-recenter (pos)
    "Recenter the overlays of the current buffer around position POS."

