[Emacs-diffs] Changes to emacs/src/buffer.c

[Colin Walters]

Index: emacs/src/buffer.c
diff -c emacs/src/buffer.c:1.387 emacs/src/buffer.c:1.388
*** emacs/src/buffer.c:1.387    Mon Jun  3 14:03:14 2002
--- emacs/src/buffer.c  Sat Jun  8 16:25:31 2002
***************
*** 3912,3939 ****
       (overlay, prop)
       Lisp_Object overlay, prop;
  {
-   Lisp_Object plist, fallback;
- 
    CHECK_OVERLAY (overlay);
! 
!   fallback = Qnil;
! 
!   for (plist = XOVERLAY (overlay)->plist;
!        CONSP (plist) && CONSP (XCDR (plist));
!        plist = XCDR (XCDR (plist)))
!     {
!       if (EQ (XCAR (plist), prop))
!       return XCAR (XCDR (plist));
!       else if (EQ (XCAR (plist), Qcategory))
!       {
!         Lisp_Object tem;
!         tem = Fcar (Fcdr (plist));
!         if (SYMBOLP (tem))
!           fallback = Fget (tem, prop);
!       }
!     }
! 
!   return fallback;
  }
  
  DEFUN ("overlay-put", Foverlay_put, Soverlay_put, 3, 3, 0,
--- 3912,3919 ----
       (overlay, prop)
       Lisp_Object overlay, prop;
  {
    CHECK_OVERLAY (overlay);
!   return lookup_char_property (XOVERLAY (overlay)->plist, prop, 0);
  }
  
  DEFUN ("overlay-put", Foverlay_put, Soverlay_put, 3, 3, 0,