oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Data::Dumper clean-up

Browse source
This commit is contained in:
Colin Kuskie 2007-03-01 00:19:15 +00:00
parent d32e127e8d
commit f800a0d8b0
3 changed files with 1 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Help/Asset_Template.pm
View file

@ -176,9 +176,6 @@ our $HELP = {
my $i18n = WebGUI::International->new($session, 'Asset_Template'); my $i18n = WebGUI::International->new($session, 'Asset_Template');
my $yes = $i18n->get(138, 'WebGUI'); my $yes = $i18n->get(138, 'WebGUI');
my $no = $i18n->get(139, 'WebGUI'); my $no = $i18n->get(139, 'WebGUI');
use Data::Dumper;
$session->errorHandler->warn(Dumper \@enabledPlugins);
$session->errorHandler->warn(Dumper \@plugins);
my $plugin_table = my $plugin_table =
join "\n", join "\n",
map { join '', '<tr><td>', $_, map { join '', '<tr><td>', $_,

2
lib/WebGUI/Help/Workflow_Activity.pm
View file

@ -75,8 +75,6 @@ our $HELP = {
my @activities = map { s/^WebGUI::Workflow::Activity:://; $_; } my @activities = map { s/^WebGUI::Workflow::Activity:://; $_; }
map { @{ $workflows{$_} } } map { @{ $workflows{$_} } }
keys %workflows; keys %workflows;
#use Data::Dumper;
#$session->errorHandler->warn(Dumper \@activities);
return map { return map {
my ($namespace, $tag) = ($_, $_); my ($namespace, $tag) = ($_, $_);
$tag =~ s/([a-z])([A-Z])/$1 $2/g; #Separate studly caps $tag =~ s/([a-z])([A-Z])/$1 $2/g; #Separate studly caps

2
lib/WebGUI/Workflow/Activity/CalendarUpdateFeeds.pm
View file

@ -88,7 +88,7 @@ sub execute {
my $sth = $self->session->db->prepare("select * from Calendar_feeds"); my $sth = $self->session->db->prepare("select * from Calendar_feeds");
$sth->execute(); $sth->execute();
use Data::Dumper; #use Data::Dumper;
FEED:while (my $feed = $sth->hashRef) { FEED:while (my $feed = $sth->hashRef) {