[Emacs-diffs] Changes to emacs/lisp/wid-edit.el

[David Ponce]

Index: emacs/lisp/wid-edit.el
diff -c emacs/lisp/wid-edit.el:1.136 emacs/lisp/wid-edit.el:1.137
*** emacs/lisp/wid-edit.el:1.136        Sat Jan 29 17:21:12 2005
--- emacs/lisp/wid-edit.el      Tue Apr  5 06:41:09 2005
***************
*** 1185,1193 ****
      ;; or if a special `boundary' field has been added after the widget
      ;; field.
      (if (overlayp overlay)
!       (if (and (not (eq (get-char-property (overlay-end overlay)
!                                            'field
!                                            (widget-field-buffer widget))
                          'boundary))
                 (or widget-field-add-space
                     (null (widget-get widget :size))))
--- 1185,1201 ----
      ;; or if a special `boundary' field has been added after the widget
      ;; field.
      (if (overlayp overlay)
!       (if (and (not (eq (with-current-buffer
!                             (widget-field-buffer widget)
!                           (save-restriction
!                             ;; `widget-narrow-to-field' can be
!                             ;; active when this function is called
!                             ;; from an change-functions hook. So
!                             ;; temporarily remove field narrowing
!                             ;; before to call `get-char-property'.
!                             (widen)
!                             (get-char-property (overlay-end overlay)
!                                                'field)))
                          'boundary))
                 (or widget-field-add-space
                     (null (widget-get widget :size))))