From 8fdc63623ee555b8f11238ff66f3ba23617165e8 Mon Sep 17 00:00:00 2001
From: David Aspinall
Date: Tue, 16 Jul 2002 17:14:15 +0000
Subject: Dodgy patch to fix selection ordering of overlays. PBP works in Emacs
 now.

---
 generic/span-overlay.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'generic')

diff --git a/generic/span-overlay.el b/generic/span-overlay.el
index e626aefa..977399b2 100644
--- a/generic/span-overlay.el
+++ b/generic/span-overlay.el
@@ -162,7 +162,11 @@ elements = S0 S1 S2 .... [tl-seq.el]"
       (if (not (memq (car os) overlays))
 	  (setq overlays (cons (car os) overlays)))
       (setq os (cdr os)))
-    overlays))
+    ;; NB: 6.4 (PG 3.4) da: added this next reverse
+    ;; since somewhere order is being confused;
+    ;; PBP is selecting _largest_ region rather than
+    ;; smallest!?
+    (if overlays (nreverse overlays))))
 
 ;; assumes that there are no repetitions in l or m
 (defun append-unique (l m)
-- 
cgit v1.2.3