From 9c894e5158f1157bce25e52f57cbe1a619f6f541 Mon Sep 17 00:00:00 2001
From: Doug Bell <doug@plainblack.com>
Date: Thu, 9 Dec 2010 19:02:51 -0600
Subject: [PATCH] fix derp message to look more like carp message

---
 lib/WebGUI/Deprecate.pm | 4 ++--
 lib/WebGUI/Form.pm      | 1 +
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Deprecate.pm b/lib/WebGUI/Deprecate.pm
index 03ef81779..ec822e340 100644
--- a/lib/WebGUI/Deprecate.pm
+++ b/lib/WebGUI/Deprecate.pm
@@ -34,11 +34,11 @@ sub derp ($) { # DEprecation caRP
 
     # Add stack info to message
     unless ( $message =~ /\n$/ ) {
-        $message .= " at " . join( "-", (caller(1))[0,2] );
+        $message .= " at " . join( " line ", (caller(1))[0,2] );
     }
 
     return if ( $derped{ $message }++ ); # HERP
-    warn $message;
+    warn $message . "\n"; # DERP
 }
 
 sub deprecate ($$) {
diff --git a/lib/WebGUI/Form.pm b/lib/WebGUI/Form.pm
index 4c32668f8..b24b67bef 100644
--- a/lib/WebGUI/Form.pm
+++ b/lib/WebGUI/Form.pm
@@ -19,6 +19,7 @@ use Carp qw( croak );
 use Scalar::Util qw( blessed );
 use WebGUI::International;
 use WebGUI::Pluggable;
+use WebGUI::Deprecate;
 
 =head1 NAME