diff options
author | fields_t <oth3r1if3@users.noreply.github.com> | 2004-03-20 18:58:41 +0000 |
---|---|---|
committer | fields_t <oth3r1if3@users.noreply.github.com> | 2004-03-20 18:58:41 +0000 |
commit | dce136f7f481fbefab32c857f7dbb20f5383d2b4 (patch) | |
tree | 9a9d6a917341ace8b59b6744f4b59f66d1ad54d0 | |
parent | 05ce72a2d90515e4097c6acb00628912188cd0d7 (diff) | |
download | MPC-unlabeled-1.3.18.tar.gz |
Fri Mar 19 15:35:27 MST 2004 Trevor Fields <fields_t@ociweb.com>unlabeled-1.3.18
-rw-r--r-- | modules/VC71WorkspaceCreator.pm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/modules/VC71WorkspaceCreator.pm b/modules/VC71WorkspaceCreator.pm index 1362e756..961bab8a 100644 --- a/modules/VC71WorkspaceCreator.pm +++ b/modules/VC71WorkspaceCreator.pm @@ -26,9 +26,17 @@ use vars qw(@ISA); sub pre_workspace { my($self) = shift; my($fh) = shift; + my($crlf) = $self->crlf(); - print $fh "Microsoft Visual Studio Solution File, Format Version 8.00" . - $self->crlf(); + print $fh 'Microsoft Visual Studio Solution File, Format Version 8.00', $crlf, + '#', $crlf, + '# $Id$', $crlf, + '#', $crlf, + '# This file was generated by MPC. Any changes made directly to', $crlf, + '# this file will be lost the next time it is generated.', $crlf, + '#', $crlf, + '# MPC Command:', $crlf, + "# $0 @ARGV", $crlf; } |