/usr/bin/guile-gnome-2 is in guile-gnome2-glib 2.16.4-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 | #! /bin/sh
# Copyright (C) 2004 Free Software Foundation, Inc.
# Public domain.
# Written by Andy Wingo for guile-gnome.
# The purpose of this script is twofold. First, it serves to find
# `guile' in the load path instead of statically "linking" to
# /usr/bin/guile. Second, it will set up the guile load path and the
# library path such that using guile-gnome modules will Just Work. This
# is necessary because we might choose to break the application
# interfaces in the future, so we need to allow for parallel installs.
# Note that the proper way to make a script that will use this as the
# interpreter is as follows, removing `# ' on each line:
# #! /bin/sh
# exec guile-gnome -s $0 "$@"
# !#
# This will allow the shell to find `guile-gnome' in the path.
# Hack around guile-1.6's lack of /usr/local paths in its load-dir.
# (Otherwise a user looking for g-wrap / guile-lib installed in
# /usr/local will be unpleasantly surprised.)
localpath=/usr/local/share/guile/site:/usr/local/share/guile/1.6:/usr/local/share/guile
if test "x$GUILE_LOAD_PATH" = "x"; then
GUILE_LOAD_PATH="/usr/share/guile-gnome-2":$localpath
else
# Because GUILE_LOAD_PATH is essentially a user customization, allow
# it to have precedence over $localpath.
GUILE_LOAD_PATH="/usr/share/guile-gnome-2":$GUILE_LOAD_PATH:$localpath
fi
# Probably will always be necessary to resolve libguile-gnome-gobject
# link.
if test /usr/lib != /usr/lib -a /usr/lib != /usr/local/lib; then
if test "x$LD_LIBRARY_PATH" = "x"; then
LD_LIBRARY_PATH=/usr/lib
else
LD_LIBRARY_PATH=/usr/lib:$LD_LIBRARY_PATH
fi
fi
# Can be removed after g-wrap is fixed.
if test "x$LD_LIBRARY_PATH" = "x"; then
LD_LIBRARY_PATH=/usr/lib/guile-gnome-2
else
LD_LIBRARY_PATH=/usr/lib/guile-gnome-2:$LD_LIBRARY_PATH
fi
export GUILE_LOAD_PATH LD_LIBRARY_PATH
# Taken from autoconf.info, "Portable Shell"
case $# in
0) exec guile;;
*) exec guile "$@";;
esac
|