]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/tex-stream.cc
release: 0.1.61
[lilypond.git] / lily / tex-stream.cc
index 02c33a8707a9bc5c860002e49fd6ba1f50e5cc4f..91f26921b324cabab8a52ddfdb146937945e53e6 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
 
 */
 
@@ -30,11 +30,22 @@ Tex_stream::Tex_stream (String filename)
 void
 Tex_stream::header()
 {
-  *os << _("% Creator: ") << get_version_str() << "\n";
-  *os << _("% Automatically generated, at ");
-  time_t t (time (0));
-  *os << ctime (&t)<<"\n";
+  *os << _("% Creator: ");
+  if (no_timestamps_global_b)
+    *os << "GNU LilyPond\n";
+  else
+    *os << get_version_str() << "\n";
+  *os << _("% Automatically generated");
+  if (no_timestamps_global_b)
+    *os << ".\n";
+  else
+    {
+      *os << _(", at ");
+      time_t t (time (0));
+      *os << ctime (&t) << "%\n";
+    }
 }
+
 Tex_stream::~Tex_stream()
 {
   *os << flush;