From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Tue, 9 Mar 2010 04:22:05 +0000 (-0500)
Subject: move version number to separate variable
X-Git-Tag: msva-perl/0.1~7
X-Git-Url: http://git.tremily.us/gitweb.cgi?a=commitdiff_plain;h=179e568b34203f622bdd83b1289ac8389abc8853;p=monkeysphere-validation-agent.git

move version number to separate variable
---

diff --git a/msva-perl b/msva-perl
index 3ace79f..ad8faaa 100755
--- a/msva-perl
+++ b/msva-perl
@@ -34,6 +34,8 @@ use strict;
   use JSON;
   use POSIX qw(strftime);
 
+  my $version = '0.1';
+
   my %dispatch = (
                   '/' => { handler => \&noop,
                            methods => { 'GET' => 1 },
@@ -125,7 +127,7 @@ use strict;
     my $cgi = shift;
     return '200 OK', { available => JSON::true,
                        protoversion => 1,
-                       server => "MSVA-Perl 0.1" };
+                       server => "MSVA-Perl ".$version };
   }
 
   # returns an empty list if bad key found.