# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1170604897 0
# Node ID a3fbf0410f075c5466be48b9e8b81f82f006bfab
# Parent  ca1b3744460a66719f4919df1f3d31e42e2f7b69
(widget-default-create): Insert new text at the :from marker _after_ the
marker, not before it.

diff -r ca1b3744460a -r a3fbf0410f07 lisp/wid-edit.el
--- a/lisp/wid-edit.el	Sun Feb 04 11:16:54 2007 +0000
+++ b/lisp/wid-edit.el	Sun Feb 04 16:01:37 2007 +0000
@@ -1509,7 +1509,7 @@
        (widget-apply widget :value-create)))
    (let ((from (point-min-marker))
 	 (to (point-max-marker)))
-     (set-marker-insertion-type from t)
+     (set-marker-insertion-type from nil)
      (set-marker-insertion-type to nil)
      (widget-put widget :from from)
      (widget-put widget :to to)))