guile-config: Show `-L$libdir' before `-lguile'.

diff --git a/NEWS b/NEWS
index a399f23..55302b7 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -45,6 +45,7 @@ Changes in 1.8.6 (since 1.8.5)
 This makes these internal functions technically not callable from
 application code.
 
+** `guile-config link' now prints `-L$libdir' before `-lguile'
 ** Fix build issue on Tru64
 
 \f

diff --git a/guile-config/ChangeLog b/guile-config/ChangeLog
index f4286e3..d450f25 100644 (file)
--- a/guile-config/ChangeLog
+++ b/guile-config/ChangeLog
@@ -1,3 +1,8 @@
+2008-06-02  Ludovic Courtès  <ludo@gnu.org>
+
+       * guile-config.in (build-link): Show `-L' before `-lguile'.
+       Reported by Peter O'Gorman <pogma@thewrittenword.com>.
+
 2008-01-22  Neil Jerram  <neil@ossau.uklinux.net>
 
        * COPYING: Removed.

diff --git a/guile-config/guile-config.in b/guile-config/guile-config.in
index e5687da..b782292 100644 (file)
--- a/guile-config/guile-config.in
+++ b/guile-config/guile-config.in
@@ -4,7 +4,7 @@
 ;;;; guile-config --- utility for linking programs with Guile
 ;;;; Jim Blandy <jim@red-bean.com> --- September 1997
 ;;;; 
-;;;;   Copyright (C) 1998, 2001, 2004, 2005, 2006 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1998, 2001, 2004, 2005, 2006, 2008 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -151,11 +151,11 @@
     (display (string-join
              (list
               (get-build-info 'CFLAGS)
-              "-lguile -lltdl" 
                (if (or (string=? libdir "/usr/lib")
                        (string=? libdir "/usr/lib/"))
                   ""
                   (string-append "-L" (get-build-info 'libdir)))
+               "-lguile -lltdl"
               (string-join other-flags)
 
               )))