URL:
<http://savannah.gnu.org/bugs/?31558>
Summary: Bug in preview four bars.
Project: GNU Denemo, a gtk+ frontend to GNU Lilypond
Submitted by: None
Submitted on: Fri 05 Nov 2010 10:00:47 PM UTC
Category: None
Severity: 3 - Normal
Item Group: None
Status: None
Privacy: Public
Assigned to: None
Open/Closed: Open
Discussion Lock: Any
_______________________________________________________
Details:
The script didn't go to the beginning of the measure the cursor was in, so
that the first bar was effectively incomplete unless the cursor happened to be
at the beginning of the bar. This should work better now.
-Dan W.
(let ((N 4)) ;set N to be number of bars to preview
(define (MoveRightNBars NumBars)
(if (> NumBars 0)
(begin
(d-MoveToMeasureRight)
(MoveRightNBars (- NumBars 1)))
))
(d-PushPosition)
(while (d-MoveToStaffUp))
(d-PushPosition)
(d-TypesettingOn)
(MoveRightNBars N)
(d-TypesettingOff)
(d-PushPosition)
(d-MoveToBeginning)
(d-TypesettingOff)
(d-PrintPreview)
(d-DeleteObject)
(d-PopPosition)
(d-DeleteObject)
(d-PopPosition)
(d-DeleteObject)
(d-PopPosition)
) ;let
_______________________________________________________
File Attachments:
-------------------------------------------------------
Date: Fri 05 Nov 2010 10:00:47 PM UTC Name: Preview4Bars Size: 839B By:
None
<http://savannah.gnu.org/bugs/download.php?file_id=21937>
_______________________________________________________
Reply to this item at:
<http://savannah.gnu.org/bugs/?31558>
_______________________________________________
Message sent via/by Savannah
http://savannah.gnu.org/
_______________________________________________
Denemo-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/denemo-devel
