Author: mmaslano
Update of /cvs/pkgs/rpms/perl-Syntax-Highlight-Engine-Kate/EL-5
In directory cvs01.phx2.fedoraproject.org:/tmp/cvs-serv4911
Added Files:
Syntax-Highlight-Engine-Kate-0.04-notdefined.patch
Log Message:
Add patch.
Syntax-Highlight-Engine-Kate-0.04-notdefined.patch:
Kate.pm | 6 ------
Kate/All.pm | 2 --
Kate/Template.pm | 8 +++++---
3 files changed, 5 insertions(+), 11 deletions(-)
--- NEW FILE Syntax-Highlight-Engine-Kate-0.04-notdefined.patch ---
diff -up Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/All.pm.old Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/All.pm
--- Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/All.pm.old 2006-08-20 23:10:45.000000000 +0200
+++ Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/All.pm 2009-04-29 15:33:35.923321436 +0200
@@ -16,8 +16,6 @@ use Syntax::Highlight::Engine::Kate::AWK
use Syntax::Highlight::Engine::Kate::Ada;
use Syntax::Highlight::Engine::Kate::Alerts;
use Syntax::Highlight::Engine::Kate::Asm6502;
-use Syntax::Highlight::Engine::Kate::BaseTest;
-use Syntax::Highlight::Engine::Kate::BaseTestchild;
use Syntax::Highlight::Engine::Kate::Bash;
use Syntax::Highlight::Engine::Kate::BibTeX;
use Syntax::Highlight::Engine::Kate::C;
diff -up Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate.pm.old Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate.pm
--- Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate.pm.old 2008-02-04 06:47:19.000000000 +0100
+++ Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate.pm 2009-04-29 15:56:37.241071190 +0200
@@ -79,7 +79,6 @@ sub new {
'*.asp' => ['ASP', ],
'*.awk' => ['AWK', ],
'*.bas' => ['FreeBASIC', ],
- '*.basetest' => ['BaseTest', ],
'*.bash' => ['Bash', ],
'*.bi' => ['FreeBASIC', ],
'*.bib' => ['BibTeX', ],
@@ -234,7 +233,6 @@ sub new {
'*.tji' => ['TaskJuggler', ],
'*.tjp' => ['TaskJuggler', ],
'*.tk' => ['Tcl/Tk', ],
- '*.tst' => ['BaseTestchild', ],
'*.uc' => ['UnrealScript', ],
'*.v' => ['Verilog', ],
'*.vcg' => ['GDL', ],
@@ -417,8 +415,6 @@ sub new {
'yacas',
],
'Test' => [
- 'BaseTest',
- 'BaseTestchild',
],
};
$self->{'syntaxes'} = {
@@ -436,8 +432,6 @@ sub new {
'Ansys' => 'Ansys',
'Apache Configuration' => 'Apache_Configuration',
'Asm6502' => 'Asm6502',
- 'BaseTest' => 'BaseTest',
- 'BaseTestchild' => 'BaseTestchild',
'Bash' => 'Bash',
'BibTeX' => 'BibTeX',
'C' => 'C',
diff -up Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/Template.pm.old Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/Template.pm
--- Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/Template.pm.old 2009-04-28 10:31:14.097979796 +0200
+++ Syntax-Highlight-Engine-Kate-0.04/lib/Syntax/Highlight/Engine/Kate/Template.pm 2009-04-28 10:43:19.169730781 +0200
@@ -531,9 +531,11 @@ sub snippet {
sub snippetAppend {
my ($self, $ch) = @_;
- $self->{'snippet'} = $self->{'snippet'} . $ch;
- if ($ch ne '') {
- $self->linesegment($self->linesegment . $ch);
+ if (defined($ch)) {
+ $self->{'snippet'} = $self->{'snippet'} . $ch;
+ if ($ch ne '') {
+ $self->linesegment($self->linesegment . $ch);
+ }
}
}
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
