diff --git a/lib/WebGUI/SQL.pm b/lib/WebGUI/SQL.pm
index 280f5b51a..472763db1 100644
--- a/lib/WebGUI/SQL.pm
+++ b/lib/WebGUI/SQL.pm
@@ -357,7 +357,7 @@ sub quickArray {
 
 =cut
 
-sub quickTab {
+sub quickCSV {
         my ($sth, $output, @data);
         $sth = WebGUI::SQL->new($_[1],$_[2]);
         $output = join(",",$sth->getColumnNames)."\n";