Browse Source

Missed a few earlier: Clean up the few remaining $jrsoftware$ tags which were used in the days of CVS.

Martijn Laan 1 năm trước cách đây
mục cha
commit
d835e5755a

+ 0 - 2
Components/PathFuncTest.pas

@@ -7,8 +7,6 @@ unit PathFuncTest;
   For conditions of distribution and use, see LICENSE.TXT.
 
   Test unit for PathFunc
-
-  $jrsoftware: issrc/Components/PathFuncTest.pas,v 1.10 2010/04/19 21:43:01 jr Exp $
 }
 
 interface

+ 0 - 2
Examples/MyProg/Help/styles.css

@@ -3,8 +3,6 @@
   Copyright (C) 1997-2006 Jordan Russell
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
-
-  $jrsoftware: issrc/Examples/MyProg/Help/styles.css,v 1.1 2006/09/28 12:24:33 mlaan Exp $
 */
 
 BODY {

+ 0 - 2
ISHelp/Staging/styles.css

@@ -3,8 +3,6 @@
   Copyright (C) 1997-2010 Jordan Russell
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
-
-  $jrsoftware: ishelp/Staging/styles.css,v 1.7 2010/09/17 03:48:14 jr Exp $
 */
 
 BODY {

+ 0 - 2
ISHelp/compile.bat

@@ -6,8 +6,6 @@ rem  Portions by Martijn Laan
 rem  For conditions of distribution and use, see LICENSE.TXT.
 rem
 rem  Batch file to compile the help file
-rem
-rem  $jrsoftware: ishelp/compile.bat,v 1.5 2010/06/07 22:15:42 jr Exp $
 
 setlocal
 

+ 0 - 2
ISHelp/isetup.dtd

@@ -4,8 +4,6 @@
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
 
-  $jrsoftware: ishelp/isetup.dtd,v 1.6 2009/07/29 11:56:22 mlaan Exp $
-
   Document Type Definition for isetup.xml
 -->
 

+ 0 - 2
Projects/Helper/Helper.c

@@ -8,8 +8,6 @@
 
   Compiled on Visual Studio 2005 SP1
   Tested on x64 and IA-64 architectures (Athlon 64 and Merced specifically).
-
-  $jrsoftware: issrc/Projects/Helper/Helper.c,v 1.8 2008/10/16 19:27:24 jr Exp $
 */
 
 #define _WIN32_IE 0x0600

+ 0 - 2
Projects/ISPP/Help/Staging/styles.css

@@ -3,8 +3,6 @@
   Copyright (C) 1997-2010 Jordan Russell
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
-
-  $jrsoftware: ishelp/Staging/styles.css,v 1.7 2010/09/17 03:48:14 jr Exp $
 */
 
 BODY {

+ 0 - 2
Projects/ISPP/Help/isetup.dtd

@@ -4,8 +4,6 @@
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
 
-  $jrsoftware: ishelp/isetup.dtd,v 1.6 2009/07/29 11:56:22 mlaan Exp $
-
   Document Type Definition for isetup.xml
 -->
 

+ 2 - 1
Projects/Src/ScriptFunc.pas

@@ -185,7 +185,8 @@ begin
   const BadType2: AnsiString = 'Longint';
 
   Result := (Pos(GoodTerminator, ScriptFunc) <> 0) and
-            (Pos(BadType1, ScriptFunc) = 0) and (Pos(BadType2, ScriptFunc) = 0);
+            (Pos(BadType1, ScriptFunc) = 0) and (Pos(BadType2, ScriptFunc) = 0) and
+            (ScriptFunc[Length(ScriptFunc)] = ';');
 end;
 
 procedure CheckIsCleanScriptFuncTable(const ScriptFuncTable: TScriptTable);