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 | ee961c2f7bd16b0bbea85f61ca06488793b5b108 (patch) | |
| tree | f3529ab46217a797db8c10ad66f542babe19e5c3 | |
| parent | 4c267b4eac46e7a037f2a2cb7e041e30f7ea711f (diff) | |
| download | MPC-unlabeled-1.4.50.tar.gz | |
Fri Mar 19 15:35:27 MST 2004 Trevor Fields <fields_t@ociweb.com>unlabeled-1.4.50
| -rw-r--r-- | modules/EM3WorkspaceCreator.pm | 11 | ||||
| -rw-r--r-- | modules/VA4WorkspaceCreator.pm | 11 |
2 files changed, 19 insertions, 3 deletions
diff --git a/modules/EM3WorkspaceCreator.pm b/modules/EM3WorkspaceCreator.pm index e374de01..f0d49eba 100644 --- a/modules/EM3WorkspaceCreator.pm +++ b/modules/EM3WorkspaceCreator.pm @@ -35,8 +35,15 @@ sub pre_workspace { my($fh) = shift; my($crlf) = $self->crlf(); - print $fh "Microsoft eMbedded Visual Tools Workspace File, Format Version 3.00$crlf" . - "# WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE!$crlf" . + print $fh 'Microsoft eMbedded Visual Tools Workspace File, Format Version 3.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, $crlf; } diff --git a/modules/VA4WorkspaceCreator.pm b/modules/VA4WorkspaceCreator.pm index bc444485..09785638 100644 --- a/modules/VA4WorkspaceCreator.pm +++ b/modules/VA4WorkspaceCreator.pm @@ -41,7 +41,16 @@ sub pre_workspace { my($fh) = shift; my($crlf) = $self->crlf(); - print $fh "// Visual Age C++ 4 workspace file$crlf$crlf"; + print $fh '// Visual Age C++ 4 workspace file', $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, + $crlf; } |