]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/output-gnome.scm
*** empty log message ***
[lilypond.git] / scm / output-gnome.scm
index 3ac60a1838833d09d03af18e6f46f21001c03002..1f6c7d2c51dcf531bd3e9533e8eb57def730b6e0 100644 (file)
@@ -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
 
 ;;;  
 ;;;   * Build LilyPond with gui support: configure --enable-gui
 ;;;
-;;;   * Supposing that LilyPond was built in ~/cvs/lilypond, tell X about
-;;;     feta fonts:
+;;;   * Supposing that LilyPond was built in ~/cvs/savannah/lilypond,
+;;;     tell fontconfig about the feta fonts dir:
 "
-ln -s ~/cvs/lilypond/mf/out ~/.fonts
-mkfontdir ~/.fonts
-xset +fp ~/.fonts
+cat > ~/.fonts.conf << EOF
+<fontconfig>
+<dir>~/cvs/savannah/lilypond/mf/out</dir>
+</fontconfig>
+EOF
+"
+;;;     or copy all your .pfa/.pfb's to ~/.fonts if your fontconfig
+;;;     already looks there for fonts.  Check if it works by doing:
+"
+fc-list | grep -i lily
 "
 ;;;
 ;;;   * Setup environment
@@ -60,7 +67,7 @@ export XEDITOR='/usr/bin/emacsclient --no-wait +%l:%c %f'
 ;;;
 ;;;  * Run lily:
 "
-lilypond-bin -fgnome input/simple-song.ly
+lilypond -fgnome input/simple-song.ly
 "
 ;;; point-and-click: (mouse-1) click on a graphical object;
 ;;; grob-property-list: (mouse-3) click on a graphical object.
@@ -159,9 +166,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 +224,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)