938 |
stop => qq{ update feeds set active = false where url = ? }, |
stop => qq{ update feeds set active = false where url = ? }, |
939 |
}; |
}; |
940 |
|
|
941 |
if (my $q = $sql->{$command} ) { |
if ( $command eq 'add' && ! $channel ) { |
942 |
|
$res = "ERROR: got '$msg' which doesn't have #channel in it, ignoring!"; |
943 |
|
} elsif (my $q = $sql->{$command} ) { |
944 |
my $sth = $dbh->prepare( $q ); |
my $sth = $dbh->prepare( $q ); |
945 |
my @data = ( $url ); |
my @data = ( $url ); |
946 |
if ( $command eq 'add' ) { |
if ( $command eq 'add' ) { |
956 |
} else { |
} else { |
957 |
$res = "ERROR: don't know what to do with: $msg"; |
$res = "ERROR: don't know what to do with: $msg"; |
958 |
} |
} |
|
|
|
959 |
} |
} |
960 |
|
|
961 |
if ($res) { |
if ($res) { |