Update of /cvsroot/fink/dists/10.7/stable/main/finkinfo/languages
In directory vz-cvs-3.sog:/tmp/cvs-serv24365
Added Files:
guile18-gtk.info guile18-gtk.patch guile18-gui.info
guile18-gui.patch guile18-lib.info
Log Message:
ok for 10.7
--- NEW FILE: guile18-lib.info ---
Package: guile18-lib
Version: 0.1.6
Revision: 2
BuildDepends: guile18, guile18-dev, guile18-libs
Depends: gtk+2 (>= 2.12.0-1), guile18
Source: http://download.gna.org/guile-lib/guile-lib-%v.tar.gz
Source-MD5: 27eb3bf086a6f03187dfb60d76a87322
Description: Repository of code written in Guile Scheme
DescDetail: <<
Guile-Lib is intended as an accumulation place for pure-scheme Guile
modules, allowing for people to cooperate integrating their generic
Guile modules into a coherent library. Think a down-scaled,
limited-scope CPAN for Guile.
Guile-Lib covers the following areas:
- Unit testing framework ala JUnit
- Logging system
- String routines (wrapping, completion, soundex algorithm)
- OS process chains (think "shell pipes in scheme")
- ANSI escape sequence text coloring
- Structured text (plain, texinfo, html)
- SRFI-35 (conditions)
<<
CompileScript: <<
#!/bin/sh -efv
export PATH=%p/share/guile/1.8/scripts/binoverride:$PATH
GUILE_LOAD_PATH=%p/share/guile/1.8
./configure
make
<<
InfoDocs: guile-library.info
DocFiles: AUTHORS ChangeLog README COPYING NEWS TODO INSTALL
License: GPL
Maintainer: W. G. Scott <[email protected]>
Homepage: https://gna.org/projects/guile-lib
--- NEW FILE: guile18-gtk.info ---
Package: guile18-gtk
Version: 2.1
Revision: 2
#PatchFile: %n.patch
#PatchFile-MD5: cd2e62770b704f00043ae4b073647935
BuildDepends: <<
atk1 (>= 1.20.0-1) ,
cairo (>= 1.6-1) ,
expat1 ,
fink (>= 0.24.12) ,
fontconfig2-dev (>= 2.4.1-1) ,
freetype219 (>= 2.3.5-1) ,
gettext-tools ,
glib2-dev (>= 2.14.0-1) ,
glitz ,
gmp ,
gtk+2-dev (>= 2.12.0-1) ,
gtkglarea2 (>= 1.99.0-1005) ,
guile18 ,
guile18-dev ,
guile18-libs ,
libgettext3-dev ,
libglade2 (>= 2.6.2-1) ,
libiconv-dev ,
libjpeg ,
libpng3 ,
libtiff ,
libtool2 ,
libxml2 (>= 2.6.30-1) ,
pango1-xft2-ft219-dev (>= 1.18.4-4) ,
pixman (>= 0.10.0-1) ,
pkgconfig (>= 0.21-1) ,
x11-dev ,
xft2-dev
<<
Depends: <<
gtk+2 (>= 2.12.0-1) ,
guile18 ,
%n-shlibs (>= %v-%r) ,
atk1-shlibs (>= 1.20.0-1) ,
glib2-shlibs (>= 2.14.0-1) ,
gmp-shlibs ,
gtk+2-shlibs (>= 2.12.0-1) ,
gtkglarea2-shlibs (>= 1.99.0-1005) ,
guile18-shlibs ,
libgettext3-shlibs ,
libglade2-shlibs (>= 2.6.2-1) ,
libiconv ,
libtool2-shlibs ,
libxml2-shlibs (>= 2.6.30-1) ,
pango1-xft2-ft219-shlibs (>= 1.18.4-4) ,
x11-shlibs
<<
Replaces: %n-shlibs (<< %v-%r)
Source: mirror:gnu:guile-gtk/guile-gtk-%v.tar.gz
Source-MD5: 4ed9b00f4cefdef412923270d8ad02a5
DocFiles: README AUTHORS NEWS COPYING
Description: Glue code to link gtk to guile
DescDetail: <<
This is some glue code to make Gtk accessible from Guile. It provides
a convenient interface for Scheme programmers to develop graphical
user interfaces. This version of guile-gtk is stripped down and
intended for people who want to use Gtk+-2.0 without Gnome.
Guile-gtk was started by Marius Vollmer <[email protected]> and is
currently mantained by Ariel Rios<[email protected]> and other
intrepid Guile hackers around the world.
<<
PatchScript: <<
# %{default_script}
perl -pi.bak -e 's|\$rpath/\$soname|%p/lib/\$soname|g' configure
perl -pi.bak -e 's|exec guile|exec guile-1.8|g' build-guile-gtk*
/bin/rm texinfo.tex
<<
NoSetMAKEFLAGS: true
SetMAKEFLAGS: -j1
SetLDFLAGS:
-Wl,-dylib_file,/System/Library/Frameworks/OpenGL.framework/Versions/A/Libraries/libGL.dylib:/System/Library/Frameworks/OpenGL.framework/Versions/A/Libraries/libGL.dylib
CompileScript: <<
#!/bin/bash -efv
source %p/bin/init.sh
export
PKG_CONFIG_PATH="%p/lib/pango-ft219/lib/pkgconfig:%p/lib/fontconfig2/lib/pkgconfig:%p/lib/freetype219/lib/pkgconfig:%p/lib/pkgconfig:${PKG_CONFIG_PATH}"
FREETYPE_CONFIG=%p/lib/freetype219/bin/freetype-config
PATH=%p/share/guile/1.8/scripts/binoverride:${PATH}
./configure --prefix=%i --with-gtk-prefix=%p --infodir=%i/share/info
--with-gdk-pixbuf=yes --with-glade=yes --with-gtkgl=yes
export GUILE_LOAD_PATH=%p/share/guile/1.8
make
<<
InstallScript: <<
#!/bin/bash -ev
export PATH=%p/share/guile/1.8/scripts/binoverride:$PATH
export GUILE_LOAD_PATH=%p/share/guile/1.8
mkdir -p %i/share/guile/1.8
make install
mv %i/share/guile/gtk %i/share/guile/1.8/gtk
mv %i/share/guile/gtk-2.0 %i/share/guile/1.8/gtk-2.0
perl -pi -e 's|%d||g' %i/share/guile/1.8/gtk/config.scm
perl -pi -e 's|%d||g' %i/share/guile/1.8/gtk-2.0/config.scm
perl -pi -e 's|%d||g' %i/lib/*.la
mv %i/bin/build-guile-gtk %i/bin/build-guile18-gtk
mv %i/share/guile-gtk %i/share/guile18-gtk
<<
License: GPL
Maintainer: W. G. Scott <[email protected]>
Homepage: http://www.gnu.org/software/guile-gtk/
#
###############################################################################
#
SplitOff: <<
Package: %N-shlibs
Depends: <<
atk1-shlibs (>= 1.20.0-1) ,
glib2-shlibs (>= 2.14.0-1) ,
gmp-shlibs ,
gtk+2-shlibs (>= 2.12.0-1) ,
gtkglarea2-shlibs (>= 1.99.0-1005) ,
guile18-shlibs ,
libgettext3-shlibs ,
libglade2-shlibs (>= 2.6.2-1) ,
libiconv ,
libtool2-shlibs ,
libxml2-shlibs (>= 2.6.30-1) ,
pango1-xft2-ft219-shlibs ,
x11-shlibs
<<
Files: <<
lib/lib*-2.0.0*.dylib
<<
Shlibs: <<
%p/lib/libguilegdkpixbuf-2.0.0.dylib 1.0.0 %n (>=2.0-1)
%p/lib/libguilegtk-2.0.0.dylib 2.0.0 %n (>=2.1-2)
%p/lib/libguileglade-2.0.0.dylib 1.0.0 %n (>=2.0-1)
%p/lib/libguilegtkgl-2.0.0.dylib 1.0.0 %n (>=2.0-9)
<<
<<
#
###############################################################################
#
SplitOff2: <<
Package: %N-dev
BuildDependsOnly: True
Conflicts: guile16-gtk-dev
Replaces: guile16-gtk-dev
Depends: %N-shlibs (= %v-%r)
Files: <<
include/*
lib/*.a
<<
<<
###############################################################################
SplitOff3: <<
Package: %N-doc
Conflicts: guile16-gtk-doc, guile16-gtk (<= 1.2-0.50-6)
Replaces: guile16-gtk-doc, guile16-gtk (<= 11.2-0.50-6)
Files: share/info
InfoDocs: guile-gtk.info
Description: Texinfo documentation files for guile18-gtk
<<
DescPackaging: <<
Advice and help from Jean-Francois Mertens and Paul Emsley is greatfully
acknowledged.
I will happily turn this over to a more competent maintainer.
<<
--- NEW FILE: guile18-gui.patch ---
diff -ruN guile-gui-0.2-orig/entry-port.scm guile-gui-0.2/entry-port.scm
--- guile-gui-0.2-orig/entry-port.scm 2007-08-08 09:36:12.000000000 -0700
+++ guile-gui-0.2/entry-port.scm 2007-08-08 09:45:30.000000000 -0700
@@ -26,7 +26,8 @@
(begin
(gtk-entry-select-region entry 0 0)
(gtk-entry-set-position entry saved-pos)
- (set! saved-pos #f)))
+ (set! saved-pos #f))
+ #f)
#f)))
;; This handler runs after insertion and checks whether the last
@@ -46,10 +47,14 @@
(begin
(set! saved-pos pos)
(if (memq 'move-cursor
paren-matching-style)
- (gtk-entry-set-position
entry open-pos))
+ (gtk-entry-set-position
entry open-pos)
+ #f)
(if (memq 'highlight-region
paren-matching-style)
- (gtk-entry-select-region
entry open-pos pos))
- (gtk-timeout-add 500
restore-text))))))))
+ (gtk-entry-select-region
entry open-pos pos)
+ #f)
+ (gtk-timeout-add 500
restore-text))
+ #f))
+ #f))))
;; This handler restores the entry contents early in the event of
;; a key press occurring before the above timer pops.
@@ -67,7 +72,8 @@
(or (>= position 0)
(set! non-history-line (gtk-entry-get-text entry)))
(set! position (+ position 1))
- (gtk-entry-set-text entry (list-ref history position)))))
+ (gtk-entry-set-text entry (list-ref history position)))
+ #f))
(define (history-down)
(if (>= position 0)
@@ -76,7 +82,8 @@
(gtk-entry-set-text entry
(if (>= position 0)
(list-ref history position)
- non-history-line)))))
+ non-history-line)))
+ #f))
(gtk-signal-connect entry
"key-press-event"
@@ -91,7 +98,8 @@
history-down)
(else #f)))
(if callback
- (gtk-signal-emit-stop-by-name entry
"key-press-event")))))
+ (gtk-signal-emit-stop-by-name entry
"key-press-event")
+ #f))))
(add-hook! (entry-new-read-hook entry)
(lambda ()
@@ -100,6 +108,7 @@
(- (length history) position)
position))
(saved-non-history-line non-history-line))
+ (set! position -1)
(set! handler
(lambda ()
(set! handler saved-handler)
diff -ruN guile-gui-0.2-orig/event-loop.scm guile-gui-0.2/event-loop.scm
--- guile-gui-0.2-orig/event-loop.scm 2007-08-08 09:36:12.000000000 -0700
+++ guile-gui-0.2/event-loop.scm 2007-08-08 09:44:23.000000000 -0700
@@ -10,7 +10,7 @@
(define (event-loop)
(let ((c callback))
(set! callback #f)
- (if c (c)))
+ (if c (c) #f))
(gtk-main-iteration)
(event-loop))
--- NEW FILE: guile18-gui.info ---
Package: guile18-gui
Version: 0.2
Revision: 1006
BuildDepends: fink (>= 0.24.12-1), guile18-dev (>= 1.6.7-1010), guile18 (>=
1.6.7-1010), guile18-libs (>= 1.6.7-1010)
Depends: guile18-shlibs (>= 1.6.7-1010), guile18-gtk (>= 2.0-7)
Source: http://www.ossau.uklinux.net/guile/guile-gui-%v.tar.gz
Source-MD5: 89764951316dc60c21ecdb3a61242bb6
DocFiles: README AUTHORS NEWS COPYING
Description: Guile gui scheme code
DescDetail: <<
Guile-gui is a collection of Guile Scheme code that aims to implement
a graphical user interface for Guile.
Please send suggestions, contributions and bug reports to
[email protected].
.
Usuage: guile18-gui &
.
A GTK window should appear that contains a text area at the top and
a (small) text entry widget at the bottom. You should be able to type
Guile expressions into the entry widget in exactly the same way
that you would type on the command line. In particular,
parenthesis matching and history should both work as normal. Your
input is echoed in a distinctive colour and font in the text area,
and the text area also displays any output that results from the
evaluation of your input.
<<
PatchFile: %n.patch
PatchFile-MD5: 2b1b811752f7e72c332be37bf5cb7ea3
CompileScript: <<
#!/bin/bash -efv
export PATH=%p/share/guile/1.8/scripts/binoverride:$PATH
./configure --prefix=%i --with-gtk-prefix=%p
export GUILE_LOAD_PATH=%p/share/guile/1.8
make
<<
InstallScript: <<
#!/bin/bash -efv
export PATH=%p/share/guile/1.8/scripts/binoverride:$PATH
export GUILE_LOAD_PATH=%p/share/guile/1.8
mkdir -p %i/share/guile/1.8
make install
mv %i/share/guile/gui %i/share/guile/1.8/gui
mv %i/bin/guile-gui %i/bin/guile18-gui
<<
License: GPL
Maintainer: W. G. Scott <[email protected]>
Homepage: http://www.ossau.uklinux.net/guile/
--- NEW FILE: guile18-gtk.patch ---
diff -ruN guile-gtk-2.0-orig/gdk-2.0.defs guile-gtk-2.0/gdk-2.0.defs
--- guile-gtk-2.0-orig/gdk-2.0.defs 2007-08-07 10:45:30.000000000 -0700
+++ guile-gtk-2.0/gdk-2.0.defs 2007-08-07 10:46:50.000000000 -0700
@@ -1,6 +1,6 @@
;; -*- scheme -*-
-;; Copyright (C) 2003, 2005, 2006 Free Software Foundation, Inc.
+;; Copyright (C) 2003, 2005, 2006, 2007 Free Software Foundation, Inc.
;;
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the GNU General Public License as
@@ -2291,6 +2291,15 @@
(options
(includes "#include <gdk/gdk.h>"
"#include <gdk/gdkrgb.h>"
- "#include <gdk/gdkx.h>")
+ "#include <gdk/gdkx.h>"
+ "
+/* These macros not in pango 1.8.1 which comes with gtk 2.6.7 */
+#ifndef PANGO_PIXELS_FLOOR
+#define PANGO_PIXELS_FLOOR(d) (((int)(d)) >> 10)
+#endif
+#ifndef PANGO_PIXELS_CEIL
+#define PANGO_PIXELS_CEIL(d) (((int)(d) + 1023) >> 10)
+#endif")
+
(init-func "sgtk_init_gtk_gdk_glue")
(extra-init-code "sgtk_init_gdk_support ();"))
------------------------------------------------------------------------------
BlackBerry® DevCon Americas, Oct. 18-20, San Francisco, CA
The must-attend event for mobile developers. Connect with experts.
Get tools for creating Super Apps. See the latest technologies.
Sessions, hands-on labs, demos & much more. Register early & save!
http://p.sf.net/sfu/rim-blackberry-1
_______________________________________________
Fink-commits mailing list
[email protected]
http://news.gmane.org/gmane.os.apple.fink.cvs