瀏覽代碼

* show version+date if -v is used

peter 20 年之前
父節點
當前提交
af058e845e
共有 1 個文件被更改,包括 5 次插入1 次删除
  1. 5 1
      utils/fpcm/fpcmake.pp

+ 5 - 1
utils/fpcm/fpcmake.pp

@@ -200,6 +200,7 @@ program fpcmake;
 
     procedure ProcessFile(const fn:string);
       begin
+        Show(V_Verbose,TitleDate);
         case ParaMode of
           m_None :
             Error('No operation specified, see -h for help');
@@ -302,7 +303,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.12  2005-01-11 21:13:12  armin
+  Revision 1.13  2005-01-31 19:26:47  peter
+    * show version+date if -v is used
+
+  Revision 1.12  2005/01/11 21:13:12  armin
   * added -V to print version
 
   Revision 1.11  2005/01/10 20:33:09  peter