[Uml-devel] CVS: kdesdk/umbrello/umbrello codegenerator.cpp,1.3,1.4

[kde at office.kde.org]

Update of /home/kde/kdesdk/umbrello/umbrello
In directory office:/tmp/cvs-serv6256

Modified Files:
	codegenerator.cpp 
Log Message:
Added an initial Perl code generator from
David Hugh-Jones <hughjonesd at yahoo.co.uk>
modified to work with new associations
> VERY alpha and incomplete. Most notable feature is that it autocreates                   
> directories (Perl expects directory structure to mimic class structure,                  
> e.g. Foo::Bar class is stored in Foo/Bar.pm)



Index: codegenerator.cpp
===================================================================
RCS file: /home/kde/kdesdk/umbrello/umbrello/codegenerator.cpp,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- codegenerator.cpp	25 Jan 2003 19:00:40 -0000	1.3
+++ codegenerator.cpp	28 Jan 2003 17:25:14 -0000	1.4
@@ -84,7 +84,7 @@
 
 	// Convert all "." to "/" : Platform-specific path separator
 	name.replace(QRegExp("\\."),"/"); // Simple hack!
-	if (ext != ".java") {
+ 	if (ext != ".java" and ext != ".pm") {
 		package = package.lower();
 		name = name.lower();
 	}