Mercurial > dwindows

changeset 1173:38e925147a60

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revert to using a file as the source for SVN revision number.
author mhessling@81767d24-ef19-dc11-ae90-00e081727c95
date Mon, 19 Sep 2011 09:52:45 +0000
parents 5ff264b41985
children f1cb493f97fd
files makefile.emx os2/svnrev.cmd
diffstat 2 files changed, 7 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/makefile.emx	Sun Sep 18 09:48:57 2011 +0000
+++ b/makefile.emx	Mon Sep 19 09:52:45 2011 +0000
@@ -9,7 +9,8 @@
 COMPRESS = lxlite
 VER = 21
 VERDOT = 2.1
-VERREV = $(shell os2\svnrev.cmd)
+AVERREV = $(shell os2\svnrev.cmd)
+include SVN.REV
 
 DEFS =
 LIBS =
--- a/os2/svnrev.cmd	Sun Sep 18 09:48:57 2011 +0000
+++ b/os2/svnrev.cmd	Mon Sep 19 09:52:45 2011 +0000
@@ -1,9 +1,10 @@
 /* REXX script to get the svn revision and display it. */
 Trace o
+fn = 'SVN.REV'
 Address System 'svnversion . | rxqueue > nul:'
 /* default version to 0, if svnversion doesn't exist or no .svn here */
 ver = 0
-If rc = 0 Then
+If Queued() \= 0 Then
    Do
       /* Using PARSE PULL preserves case */
       /* If it is a double value get the first value only */
@@ -12,5 +13,7 @@
       If ver = 'exported' Then ver = 0
       If Datatype( Right( ver, 1 ) ) \= 'NUM' Then ver = Substr( ver, 1, Length( ver) - 1 )
    End
-Say ver
+Call Stream fn, 'C', 'OPEN'
+Call Lineout fn,'VERREV='ver
+Call Stream fn, 'C', 'CLOSE'
 Exit 0