(version-not-seen-message): Add input-file-name-location to message.
2005-04-14 Jan Nieuwenhuizen <janneke@gnu.org>
+ * scm/lily-library.scm (old-relative-not-used-message)
+ (version-not-seen-message): Add input-file-name-location to message.
+
* lily/parser.yy (lilypond): Add token aliases.
* Documentation/user/music-glossary.tely (accidental): Fixes. Do
void
Lily_parser::parser_error (String s)
{
- /* FIXME: cannot otherwise internationalize this bison warning. */
- (void) _i ("syntax error, unexpected ");
lexer_->here_input ().error (_ (s.to_str0 ()));
error_level_ = 1;
}
#(if (and (ly:get-option 'old-relative)
(defined? 'input-file-name)
(not (ly:get-option 'old-relative-used)))
- (ly:warning (string-append
- "\n"
- input-file-name ": old relative compatibility was not used."
- )))%% there is a problem at the end of the input file
+ (old-relative-not-used-message input-file-name))%% there is a problem at the end of the input file
-#(if (not version-seen?)
- (version-not-seen-message))
+#(if (and (not version-seen?)
+ (defined? 'input-file-name))
+ (version-not-seen-message input-file-name))
#(if (pair? toplevel-scores)
(ly:parser-print-book parser
(debugf "design:~S\n" designsize)
scaling))
-(define-public (version-not-seen-message)
- (ly:warning
+(define-public (version-not-seen-message input-file-name)
+ (ly:message
+ (string-append
+ input-file-name ": 0: " (_ "warning: ")
(format #f
- (_ "No \\version statement found. Add~afor future compatibility.")
- (format #f "\n\n\\version ~s\n\n" (lilypond-version)))))
+ (_ "no \\version statement found, add~afor future compatibility")
+ (format #f "\n\n\\version ~s\n\n" (lilypond-version))))))
+
+(define-public (old-relative-not-used-message input-file-name)
+ (ly:message
+ (string-append
+ input-file-name ": 0: " (_ "warning: ")
+ (_ "old relative compatibility not used"))))
@echo $(ALL_PO_SOURCES)
xgettext --default-domain=$(package) --join \
--output-dir=$(po-dir)/$(outdir) --add-comments \
- --keyword=_ --keyword=_f --keyword=_i \
- --keyword=yyerror \
+ --keyword=_ --keyword=_f --keyword=_i
$(XGETTEXT_FLAGS) $(ALL_PO_SOURCES)
endif
endif