From: Jan Nieuwenhuizen <janneke@gnu.org> Date: Fri, 17 Sep 2004 15:18:34 +0000 (+0000) Subject: Small fixes. X-Git-Tag: release/2.3.17~15 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8fe4db1850510aac5c7ce1cd3a29f3092c82b4c5;p=lilypond.git Small fixes. --- diff --git a/ChangeLog b/ChangeLog index 676d9710ed..c6ea2b280b 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,7 @@ 2004-09-17 Jan Nieuwenhuizen <janneke@gnu.org> + * scm/output-gnome.scm: Small fixes. + * buildscripts/guile-gnome.sh: Getting close to 2.6.0 release. 2004-09-16 Juergen Reuter <reuter@ipd.uka.de> diff --git a/scm/output-gnome.scm b/scm/output-gnome.scm index 3ac60a1838..2b6b43881c 100644 --- a/scm/output-gnome.scm +++ b/scm/output-gnome.scm @@ -22,8 +22,8 @@ ;;; You need: ;;; ;;; * Rotty's g-wrap >= 1.9.1 (or TLA) -;;; * guile-gnome-platform >= 2.5.990 (or TLA) -;;; * pango >= 1.5.1 (or CVS) +;;; * guile-gnome-platform >= 2.5.992 (or TLA) +;;; * pango >= 1.5.2 (or CVS) ;;; ;;; See also: guile-gtk-general@gnu.org @@ -159,9 +159,7 @@ lilypond-bin -fgnome input/simple-song.ly (move item (* output-scale (+ (car system-origin) x)) (* output-scale (- (car system-origin) y))) - ;; UGH latest guile-gnome is broken - (if (defined? 'affine-relative) - (affine-relative item output-scale 0 0 output-scale 0 0)) + (affine-relative item output-scale 0 0 output-scale 0 0) item) #f))) @@ -219,15 +217,9 @@ lilypond-bin -fgnome input/simple-song.ly (make <gnome-canvas-text> #:parent (canvas-root) - - ;; experimental text placement corrections. - ;; UGHR? What happened to tex offsets? south-west? - ;; is pango doing something 'smart' wrt baseline ? - #:anchor 'south-west - #:x 0.003 #:y 0.123 - - ;;#:anchor 'west - ;;#:x 0.015 #:y -3.71 + + #:anchor 'west + #:x 0.0 #:y 0.0 #:font (pango-font-name font)