From 2a0711e8cb85117070f65054c92c7fda2fee14a8 Mon Sep 17 00:00:00 2001
From: Duke Leto <jonathan@leto.net>
Date: Fri, 18 Jun 2010 15:07:48 -0700
Subject: [PATCH] Get rid of some warnings in CXGN::Cview::Chromosome::Vector

---
 lib/CXGN/Cview/Chromosome/Vector.pm | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/lib/CXGN/Cview/Chromosome/Vector.pm b/lib/CXGN/Cview/Chromosome/Vector.pm
index c7a8f87..f5c7b3e 100644
--- a/lib/CXGN/Cview/Chromosome/Vector.pm
+++ b/lib/CXGN/Cview/Chromosome/Vector.pm
@@ -1,3 +1,4 @@
+package CXGN::Cview::Chromosome::Vector;
 
 =head1 NAME 
 
@@ -20,10 +21,9 @@ The default map units are bp (set in the constructor).
 Lukas Mueller <lam87@cornell.edu>
 
 =cut
- 
-use strict;
 
-package CXGN::Cview::Chromosome::Vector;
+use strict;
+use warnings;
 
 use CXGN::Cview::Marker::VectorFeature;
 
@@ -345,11 +345,9 @@ sub draw_caption {
     $font = GD::Font->Small;
 
     my $string = "(".$self->get_length()." bp)";
-    my $x = $self->get_X() - $font->width() * length($string)/2 ;
-    my $y = $self->get_Y() + $font->height()/2;
-    
+    $x = $self->get_X() - $font->width() * length($string)/2 ;
+    $y = $self->get_Y() + $font->height()/2;
     $image->string($font, $x, $y, $string, $color);
-    
 }
 
 
-- 
2.11.4.GIT