diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp
index 5b2293e..3e64218 100644
--- a/src/gui/client/main-window.lisp
+++ b/src/gui/client/main-window.lisp
@@ -182,12 +182,12 @@
                    (reload-button reload-button)
                    (up-button     up-button)
                    (go-button     go-button)) main-window
-    (let ((entry-autocomplete (gui-mw::entry-widget iri-entry)))
+    (let ((entry-autocomplete (gui-mw:autocomplete-entry-widget iri-entry)))
       (gui:bind entry-autocomplete
                 #$<KeyPress-Return>$
                 (lambda (e)
                   (declare (ignore e))
-                  (gui-goodies:info-dialog main-window (gui:text entry-autocomplete)))
+                  (gui-goodies:info-dialog main-window (gui:text iri-entry)))
                 :append nil))))
 
 (defmethod initialize-instance :after ((object tool-bar) &key &allow-other-keys)