}
sub generate_signature {
- my ($self, $intro_text, $title) = @_;
- return md5_hex(encode_utf8($intro_text . $title));
+ my ($self, $introtext, $title) = @_;
+ return md5_hex(encode_utf8($introtext . $title));
}
#========================================================================
* title
* url
* email
- * intro_text
+ * introtext
* tags
=item \%options
_email_to_domain($params->{email}), #emaildomain
$user->{nickname}, #name
$params->{title}, #subj
- $params->{intro_text}, #story
+ $params->{introtext}, #story
$params->{tid}, #tid
$primaryskid, #primaryskid
$user->{uid}, #uid,
$user->{ipid}, #ipid,
$user->{subnetid}, #subnetid,
- $self->generate_signature($params->{intro_text}, $params->{title}) #signature
+ $self->generate_signature($params->{introtext}, $params->{title}) #signature
);
my $sub_id = $dbh->last_insert_id(undef, undef, undef, undef);
if (!$sub_id) {
my $firehose_id = $dbh->last_insert_id(undef, undef, undef, undef);
$sql = "INSERT INTO firehose_text (title, introtext) VALUES (?, ?)";
- $rs = $dbh->do($sql, undef, $params->{title}, $params->{intro_text});
+ $rs = $dbh->do($sql, undef, $params->{title}, $params->{introtext});
if (!$rs) {
# error occured
$self->set_errorno($dbh->{mysql_errno});