Mercurial > hg > xemacs-beta

view netinstall/version.pl @ 5239:f19e6bc25969

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Backed out changeset 6466bc9ebf15 This would leave all but the first frame blank.
author Mike Sperber <sperber@deinprogramm.de>
date Tue, 13 Jul 2010 10:19:33 +0200
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";
  }
}