Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Projets publics
Sympa
Commits
c1b5d157
Commit
c1b5d157
authored
Aug 02, 2019
by
IKEDA Soji
Browse files
tidyall.
parent
746175a0
Changes
5
Hide whitespace changes
Inline
Side-by-side
src/cgi/wwsympa.fcgi.in
View file @
c1b5d157
...
...
@@ -14929,8 +14929,10 @@ sub do_send_mail {
if (@to_list and $in{'sub_action'} eq 'sendmailtolist') {
# TAG
if ($list_topics) {
Sympa::Spool::Topic->new(topic => $list_topics, method => 'sender')
->store($message);
Sympa::Spool::Topic->new(
topic => $list_topics,
method => 'sender'
)->store($message);
}
my $l_message = $message->dup;
...
...
src/lib/Sympa/Spindle/AuthorizeMessage.pm
View file @
c1b5d157
...
...
@@ -65,15 +65,20 @@ sub _twist {
if
(
$topic
=
Sympa::Spool::
Topic
->
load
(
$message
))
{
# Is message already tagged?
;
}
elsif
(
$topic
=
Sympa::Spool::
Topic
->
load
(
$message
,
in_reply_to
=>
1
))
{
}
elsif
(
$topic
=
Sympa::Spool::
Topic
->
load
(
$message
,
in_reply_to
=>
1
))
{
# Is message in-reply-to already tagged?
$topic
=
Sympa::Spool::
Topic
->
new
(
topic
=>
$topic
->
{
topic
},
method
=>
'
auto
');
$topic
=
Sympa::Spool::
Topic
->
new
(
topic
=>
$topic
->
{
topic
},
method
=>
'
auto
'
);
$topic
->
store
(
$message
);
}
elsif
(
my
$topic_list
=
$message
->
compute_topic
)
{
# Not already tagged.
$topic
=
Sympa::Spool::
Topic
->
new
(
topic
=>
$topic_list
,
method
=>
'
auto
');
$topic
=
Sympa::Spool::
Topic
->
new
(
topic
=>
$topic_list
,
method
=>
'
auto
'
);
$topic
->
store
(
$message
);
}
...
...
src/lib/Sympa/Spindle/ToListmaster.pm
View file @
c1b5d157
...
...
@@ -34,8 +34,8 @@ sub _twist {
my
$self
=
shift
;
my
$message
=
shift
;
return
Sympa::Spool::
Listmaster
->
instance
->
store
(
$message
,
$message
->
{
rcpt
},
operation
=>
$self
->
{
data
}{
type
})
?
1
:
undef
;
return
Sympa::Spool::
Listmaster
->
instance
->
store
(
$message
,
$message
->
{
rcpt
},
operation
=>
$self
->
{
data
}{
type
})
?
1
:
undef
;
}
1
;
...
...
src/lib/Sympa/Spool/Listmaster.pm
View file @
c1b5d157
...
...
@@ -54,7 +54,9 @@ sub store {
my
%options
=
@_
;
my
$mailer
=
$self
->
{
use_bulk
}
?
Sympa::Spool::
Outgoing
->
new
:
Sympa::
Mailer
->
instance
;
$self
->
{
use_bulk
}
?
Sympa::Spool::
Outgoing
->
new
:
Sympa::
Mailer
->
instance
;
my
$operation
=
$options
{
operation
};
my
$robot_id
;
...
...
@@ -100,7 +102,9 @@ sub flush {
my
%options
=
@_
;
my
$mailer
=
$self
->
{
use_bulk
}
?
Sympa::Spool::
Outgoing
->
new
:
Sympa::
Mailer
->
instance
;
$self
->
{
use_bulk
}
?
Sympa::Spool::
Outgoing
->
new
:
Sympa::
Mailer
->
instance
;
my
$purge
=
$options
{
purge
};
foreach
my
$robot_id
(
keys
%
{
$self
->
{
_stack
}})
{
...
...
src/lib/Sympa/WWW/Auth.pm
View file @
c1b5d157
...
...
@@ -157,7 +157,8 @@ sub authentication {
$log
->
syslog
('
notice
',
'
Password in database seems encrypted. Run upgrade_sympa_password.pl to rehash passwords
'
);
Sympa::
send_notify_to_listmaster
('
*
',
'
password_encrypted
',
{});
Sympa::
send_notify_to_listmaster
('
*
',
'
password_encrypted
',
{});
return
undef
;
}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment