Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
11 lines (8 sloc) 192 Bytes
UserTag delete_cart Order nickname
UserTag delete_cart Routine <<EOR
sub {
my($nickname) = @_;
$Tag->userdb({function => 'delete_cart', nickname => $nickname});
return '';
}
EOR
Jump to Line
Something went wrong with that request. Please try again.