Mercurial > hg > xemacs-beta
view netinstall/version.pl @ 545:9a775fb11bb7
[xemacs-hg @ 2001-05-18 04:39:39 by kkm]
My 3 patches of 05/01-05/03
author | kkm |
---|---|
date | Fri, 18 May 2001 04:39:44 +0000 |
parents | 3078fd1074e8 |
children |
line wrap: on
line source
while (<STDIN>) { if (/^\$Revision:\s*([0-9\.]*)/) { print "char *version = \"$1\";\n"; print "static char *id = \"\\n%%% setup-version $1\\n\";\n"; } }