microtherion/VocalEasel
1
0
Fork 0
mirror of https://github.com/microtherion/VocalEasel.git synced 2024-12-22 11:14:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

Escape quotes in lilypond titles

Browse Source
This commit is contained in:
Matthias Neeracher 2011-08-26 18:17:32 +00:00
parent af22a973cf
commit 7147acc66b
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
Sources/VLLilypondDocument.mm
View File

@ -5,7 +5,7 @@
//
// (MN) Matthias Neeracher
//
// Copyright © 2006-2007 Matthias Neeracher
// Copyright © 2006-2011 Matthias Neeracher
//
#import "VLLilypondDocument.h"
@ -87,12 +87,18 @@
}
}
- (void)substituteMacro:(NSString*)macro withValue:(NSString*)value
{
[self substituteMacro:macro withValue:value repeat:NO];
}
- (void)substituteMacro:(NSString*)macro withValue:(NSString*)value escapingQuotes:(BOOL)escape
{
if (escape)
value = [value stringByReplacingOccurrencesOfString:@"\"" withString:@"\\\""];
[self substituteMacro:macro withValue:value repeat:NO];
}
- (void) purgeMacros
{
for (NSRange range = [self rangeOfString:@"<{"];
@ -149,10 +155,10 @@ static const char * sPaperNames[] = {
float scaling= [[[pi dictionary] objectForKey:NSPrintScalingFactor]
floatValue];
[ly substituteMacro:@"TITLE" withValue:songTitle];
[ly substituteMacro:@"POET" withValue:songLyricist];
[ly substituteMacro:@"COMPOSER" withValue:songComposer];
[ly substituteMacro:@"ARRANGER" withValue:songArranger];
[ly substituteMacro:@"TITLE" withValue:songTitle escapingQuotes:YES];
[ly substituteMacro:@"POET" withValue:songLyricist escapingQuotes:YES];
[ly substituteMacro:@"COMPOSER" withValue:songComposer escapingQuotes:YES];
[ly substituteMacro:@"ARRANGER" withValue:songArranger escapingQuotes:YES];
[ly substituteMacro:@"VLVERSION" withValue:
[bndl objectForInfoDictionaryKey:@"CFBundleVersion"]];
[ly substituteMacro:@"PAPERSIZE" withValue:paper];