X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.entry.lisp;h=c4362aed040aaee94f91850534977ca7f45e5e6b;hb=280cc197440f3dec31bcbcd88b001b740be6e697;hp=6cd0c456a8fded8ab7f19a76495588c3e0695f94;hpb=2f88bc58df81c59a26979e1082cec010eda127af;p=cl-gtk2.git

diff --git a/gtk/gtk.entry.lisp b/gtk/gtk.entry.lisp
index 6cd0c45..c4362ae 100644
--- a/gtk/gtk.entry.lisp
+++ b/gtk/gtk.entry.lisp
@@ -86,7 +86,7 @@
   (start-pos :int)
   (end-pos :int))
 
-(defun editable-get-chars (editable &key (start -1) (end -1))
+(defun editable-get-chars (editable &key (start 0) (end -1))
   (gtk-editable-get-chars editable start end))
 
 (export 'editable-get-chars)