[otrs-cvs] otrs/Kernel/System/Ticket ArticleStorageDB.pm, 1.41,
1.42 ArticleStorageFS.pm, 1.36, 1.37
cvs-log at otrs.org
cvs-log at otrs.org
Thu Apr 12 23:52:18 GMT 2007
Comments:
Update of /home/cvs/otrs/Kernel/System/Ticket
In directory lancelot:/tmp/cvs-serv13790/Kernel/System/Ticket
Modified Files:
ArticleStorageDB.pm ArticleStorageFS.pm
Log Message:
Fixed delete of utf8 file names.
Author: martin
Index: ArticleStorageDB.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/Ticket/ArticleStorageDB.pm,v
retrieving revision 1.41
retrieving revision 1.42
diff -C2 -d -r1.41 -r1.42
*** ArticleStorageDB.pm 5 Apr 2007 14:30:20 -0000 1.41
--- ArticleStorageDB.pm 12 Apr 2007 23:52:13 -0000 1.42
***************
*** 166,175 ****
my @List = glob($Path);
foreach my $File (@List) {
! $File =~ s!^.*/!!;
! if ($File !~ /^plain.txt$/) {
! if (!unlink "$Path/$File") {
$Self->{LogObject}->Log(
Priority => 'error',
! Message => "Can't remove: $Path/$File: $!!",
);
}
--- 166,174 ----
my @List = glob($Path);
foreach my $File (@List) {
! if ($File !~ /(\/|\\)plain.txt$/) {
! if (!unlink $File) {
$Self->{LogObject}->Log(
Priority => 'error',
! Message => "Can't remove: $File: $!!",
);
}
***************
*** 248,253 ****
}
# encode attachemnt if it's a postgresql backend!!!
- $Self->{EncodeObject}->EncodeOutput(\$Param{Content});
if (!$Self->{DBObject}->GetDatabaseFunction('DirectBlob')) {
$Param{Content} = encode_base64($Param{Content});
}
--- 247,252 ----
}
# encode attachemnt if it's a postgresql backend!!!
if (!$Self->{DBObject}->GetDatabaseFunction('DirectBlob')) {
+ $Self->{EncodeObject}->EncodeOutput(\$Param{Content});
$Param{Content} = encode_base64($Param{Content});
}
Author: martin
Index: ArticleStorageFS.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/Ticket/ArticleStorageFS.pm,v
retrieving revision 1.36
retrieving revision 1.37
diff -C2 -d -r1.36 -r1.37
*** ArticleStorageFS.pm 5 Apr 2007 14:30:20 -0000 1.36
--- ArticleStorageFS.pm 12 Apr 2007 23:52:13 -0000 1.37
***************
*** 191,200 ****
my @List = glob($Path."/*");
foreach my $File (@List) {
! $File =~ s!^.*/!!;
! if ($File !~ /^plain.txt$/) {
! if (!unlink "$Path/$File") {
$Self->{LogObject}->Log(
Priority => 'error',
! Message => "Can't remove: $Path/$File: $!!",
);
}
--- 191,199 ----
my @List = glob($Path."/*");
foreach my $File (@List) {
! if ($File !~ /(\/|\\)plain.txt$/) {
! if (!unlink "$File") {
$Self->{LogObject}->Log(
Priority => 'error',
! Message => "Can't remove: $File: $!!",
);
}
More information about the cvs-log
mailing list