--- libctl-2.2/utils/gen-ctl-io.in.orig	Sat Dec 20 10:59:05 2003
+++ libctl-2.2/utils/gen-ctl-io.in	Sat Dec 20 10:59:30 2003
@@ -60,10 +60,10 @@
 
 EOF
 
-guile -l $libctl_dir/base/include.scm \
+guile-1.6 -l $libctl_dir/base/include.scm \
       -c "(include "'"'"$libctl_dir/base/ctl.scm"'"'") (include "'"'"$libctl_dir/utils/ctl-io.scm"'"'") (include "'"'"$1"'"'") (output-header)" >> $output_dir/ctl-io.h
 
-guile -l $libctl_dir/base/include.scm \
+guile-1.6 -l $libctl_dir/base/include.scm \
       -c "(include "'"'"$libctl_dir/base/ctl.scm"'"'") (include "'"'"$libctl_dir/utils/ctl-io.scm"'"'") (include "'"'"$1"'"'") (output-source)" >> $output_dir/ctl-io.c
 
 cat >> $output_dir/ctl-io.h <<EOF
--- libctl-2.2/configure.orig	Sat Dec 20 10:52:06 2003
+++ libctl-2.2/configure	Sat Dec 20 10:58:23 2003
@@ -2647,7 +2647,7 @@
 # Find Guile library, flags, etcetera:
 
 # Extract the first word of "guile", so it can be a program name with args.
-set dummy guile; ac_word=$2
+set dummy guile-1.6; ac_word=$2
 echo "$as_me:$LINENO: checking for $ac_word" >&5
 echo $ECHO_N "checking for $ac_word... $ECHO_C" >&6
 if test "${ac_cv_prog_guile_ok+set}" = set; then
@@ -2689,7 +2689,7 @@
 fi
 
 # Extract the first word of "guile-config", so it can be a program name with args.
-set dummy guile-config; ac_word=$2
+set dummy guile-1.6-config; ac_word=$2
 echo "$as_me:$LINENO: checking for $ac_word" >&5
 echo $ECHO_N "checking for $ac_word... $ECHO_C" >&6
 if test "${ac_cv_prog_HAVE_GUILE_CONFIG+set}" = set; then
@@ -2725,8 +2725,8 @@
 fi
 
 if test "$HAVE_GUILE_CONFIG" = "yes"; then
-	CPPFLAGS="$CPPFLAGS `guile-config compile`"
-	LIBS="$LIBS `guile-config link`"
+	CPPFLAGS="$CPPFLAGS `guile-1.6-config compile`"
+	LIBS="$LIBS `guile-1.6-config link`"
 else
 
 echo "$as_me:$LINENO: checking for sqrt in -lm" >&5