diff --git a/lib/WebGUI/Workflow/Instance.pm b/lib/WebGUI/Workflow/Instance.pm
index 5821f636a..a07630930 100644
--- a/lib/WebGUI/Workflow/Instance.pm
+++ b/lib/WebGUI/Workflow/Instance.pm
@@ -147,7 +147,7 @@ Returns the value for a given scratch variable.
 
 =cut
 
-sub get {
+sub getScratch {
 	my $self = shift;
 	my $name = shift;
 	unless (exists $self->{_scratch}) {