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

[Stefan Monnier]

Index: emacs/lisp/skeleton.el
diff -c emacs/lisp/skeleton.el:1.38 emacs/lisp/skeleton.el:1.39
*** emacs/lisp/skeleton.el:1.38 Wed May 28 14:41:41 2003
--- emacs/lisp/skeleton.el      Sat Jun  7 20:54:06 2003
***************
*** 164,170 ****
                     (and skeleton-autowrap
                          (or (eq last-command 'mouse-drag-region)
                              (and transient-mark-mode mark-active))
!                         -1))
                   (if (stringp str)
                       str))
    ;; Return non-nil to tell expand-abbrev that expansion has happened.
--- 164,175 ----
                     (and skeleton-autowrap
                          (or (eq last-command 'mouse-drag-region)
                              (and transient-mark-mode mark-active))
!                         ;; Deactivate the mark, in case one of the
!                         ;; elements of the skeleton is sensitive
!                         ;; to such situations (e.g. it is itself a
!                         ;; skeleton).
!                         (progn (deactivate-mark)
!                                -1)))
                   (if (stringp str)
                       str))
    ;; Return non-nil to tell expand-abbrev that expansion has happened.