Index: Makefile.in
==================================================================
--- Makefile.in
+++ Makefile.in
@@ -1,8 +1,8 @@
 # -*- make -*-
 # FILE: "/krispc6/home/joze/src/tclreadline/Makefile.in"
-# LAST MODIFICATION: "Sat May  8 15:10:15 1999 (joze)"
+# LAST MODIFICATION: "Mon May 10 13:10:22 1999 (joze)"
 # (C) 1998, 1999 by Johannes Zellner, <johannes@zellner.org>
 # $Id$
 # ---
 #
 # tclreadline -- gnu readline for tcl
@@ -162,10 +162,11 @@
     tclreadline.h.in \
     tclreadlineConfig.sh.in \
     tclreadlineInit.tcl.in \
     tclreadlineSetup.tcl.in \
     tclreadline.n.in \
+    pkgIndex.tcl \
     sample.tclshrc
 
 AUXILIARY = \
     aux/config.guess \
     aux/config.sub \

ADDED   pkgIndex.tcl
Index: pkgIndex.tcl
==================================================================
--- pkgIndex.tcl
+++ pkgIndex.tcl
@@ -0,0 +1,11 @@
+# Tcl package index file, version 1.1
+# This file is generated by the "pkg_mkIndex" command
+# and sourced either when an application starts up or
+# by a "package unknown" script.  It invokes the
+# "package ifneeded" command to set up package-related
+# information so that packages will be loaded automatically
+# in response to "package require" commands.  When this
+# script is sourced, the variable $dir must contain the
+# full path name of this file's directory.
+
+package ifneeded tclreadline 0.8 [list tclPkgSetup $dir tclreadline 0.8 {{tclreadlineInit.tcl source ::tclreadline::Init} {tclreadlineSetup.tcl source {::tclreadline::Glob ::tclreadline::InitCmds ::tclreadline::InitTclCmds ::tclreadline::InitTkCmds ::tclreadline::Loop ::tclreadline::Print ::tclreadline::Setup}}}]

Index: tclreadlineSetup.tcl.in
==================================================================
--- tclreadlineSetup.tcl.in
+++ tclreadlineSetup.tcl.in
@@ -1,8 +1,8 @@
 #!/usr/local/bin/tclsh
 # FILE: "/krispc6/home/joze/src/tclreadline/tclreadlineSetup.tcl.in"
-# LAST MODIFICATION: "Sat May  8 14:03:47 1999 (joze)"
+# LAST MODIFICATION: "Mon May 10 13:01:16 1999 (joze)"
 # (C) 1998, 1999 by Johannes Zellner, <johannes@zellner.org>
 # $Id$
 # ---
 #
 # tclreadline -- gnu readline for tcl
@@ -260,11 +260,13 @@
             lappend commandstring $name
         } else {
             lappend commandstring $replace
         }
     }
-    return $commandstring
+    # return $commandstring
+    # Christian Krone <krischan@sql.de> proposed
+    return [eval concat $commandstring]
 }
 
 
 
 proc ::tclreadline::Loop {} {