diff options
author | Mavridis Philippe <[email protected]> | 2022-10-15 19:07:50 +0300 |
---|---|---|
committer | Mavridis Philippe <[email protected]> | 2022-10-15 19:07:50 +0300 |
commit | 33d0b7b115765b8e334f2a80822f53b9d534f0c2 (patch) | |
tree | 86e118611240983f283cfcff5bfd1f258498179a /admin/am_edit | |
parent | e49c3e89f8017d07357ad146c76e5e3f64d9b4f1 (diff) | |
download | twin-style-machbunt-33d0b7b115765b8e334f2a80822f53b9d534f0c2.tar.gz twin-style-machbunt-33d0b7b115765b8e334f2a80822f53b9d534f0c2.zip |
KDE3->TDE conversion
Signed-off-by: Mavridis Philippe <[email protected]>
Diffstat (limited to 'admin/am_edit')
-rw-r--r-- | admin/am_edit | 150 |
1 files changed, 75 insertions, 75 deletions
diff --git a/admin/am_edit b/admin/am_edit index c641a37..d995da8 100644 --- a/admin/am_edit +++ b/admin/am_edit @@ -68,7 +68,7 @@ sub tag_CLOSURE(); sub tag_NO_UNDEFINED(); sub tag_NMCHECK(); sub tag_DIST(); -sub tag_KDEINIT(); +sub tag_TDEINIT(); # Some global globals... $verbose = 0; # a debug flag @@ -215,7 +215,7 @@ sub processMakefile ($) local @programs = (); # lists the names of programs and libraries local $program = ""; - local @kdeinits = (); # lists the kdeinit targets + local @tdeinits = (); # lists the tdeinit targets local %realObjs = (); # lists the objects compiled into $program local %sources = (); # lists the sources used for $program @@ -274,11 +274,11 @@ sub processMakefile ($) if ($sources_changed{$program}) { my $lookup = $program . '_SOURCES\s*=[ \t]*(.*)'; - if($program =~ /libkdeinit_(.*)/) { + if($program =~ /libtdeinit_(.*)/) { my $prog = $1; substituteLine($prog . '_SOURCES\s*=[ \t]*(.*)', "${prog}_SOURCES = ${prog}_dummy.$cxxsuffix\n" . - "libkdeinit_${prog}_SOURCES = " . $sources{$program}); + "libtdeinit_${prog}_SOURCES = " . $sources{$program}); $sources{$prog} = "${prog}_dummy.$cxxsuffix"; } else { @@ -614,7 +614,7 @@ sub initialise () } } - tag_KDEINIT(); + tag_TDEINIT(); while ($MakefileData =~ /\n(\S*)_OBJECTS\s*=[\034 \t]*([^\n]*)\n/g) { @@ -638,7 +638,7 @@ sub initialise () } next if ($ocv); - next if ($program =~ /^am_libkdeinit_/); + next if ($program =~ /^am_libtdeinit_/); $program =~ s/^am_// if ($program =~ /^am_/); @@ -853,148 +853,148 @@ sub tag_FINAL() } } -sub tag_KDEINIT() +sub tag_TDEINIT() { my @progs = (); my $ltlibs = ""; - my $lookup = 'kdeinit_LTLIBRARIES\s*=[ \t]*(.*)'; + my $lookup = 'tdeinit_LTLIBRARIES\s*=[ \t]*(.*)'; if ($MakefileData =~ m/\n$lookup/) { - @kdeinits = split(/[\034\s]+/, $1); + @tdeinits = split(/[\034\s]+/, $1); my $lines = ""; - foreach my $kdeinit (@kdeinits) { - if ($kdeinit =~ m/\.la$/) { - $kdeinit =~ s/\.la$//; - push(@progs, $kdeinit); + foreach my $tdeinit (@tdeinits) { + if ($tdeinit =~ m/\.la$/) { + $tdeinit =~ s/\.la$//; + push(@progs, $tdeinit); - $lines .= "\n${kdeinit}.la.$cxxsuffix:\n"; - $lines .= "\techo 'extern \"C\" int kdemain(int argc, char* argv[]);' > ${kdeinit}.la.$cxxsuffix; \\\n"; - $lines .= "\techo 'int main(int argc, char* argv[]) { return kdemain(argc,argv); }' >> ${kdeinit}.la.$cxxsuffix\n"; + $lines .= "\n${tdeinit}.la.$cxxsuffix:\n"; + $lines .= "\techo 'extern \"C\" int kdemain(int argc, char* argv[]);' > ${tdeinit}.la.$cxxsuffix; \\\n"; + $lines .= "\techo 'int main(int argc, char* argv[]) { return kdemain(argc,argv); }' >> ${tdeinit}.la.$cxxsuffix\n"; - $lines .= "\n${kdeinit}_dummy.$cxxsuffix:\n"; - $lines .= "\techo '#include <kdemacros.h>' > ${kdeinit}_dummy.$cxxsuffix; \\\n"; - $lines .= "\techo 'extern \"C\" int kdemain(int argc, char* argv[]);' >> ${kdeinit}_dummy.$cxxsuffix; \\\n"; - $lines .= "\techo 'extern \"C\" KDE_EXPORT int kdeinitmain(int argc, char* argv[]) { return kdemain(argc,argv); }' >> ${kdeinit}_dummy.$cxxsuffix\n"; + $lines .= "\n${tdeinit}_dummy.$cxxsuffix:\n"; + $lines .= "\techo '#include <kdemacros.h>' > ${tdeinit}_dummy.$cxxsuffix; \\\n"; + $lines .= "\techo 'extern \"C\" int kdemain(int argc, char* argv[]);' >> ${tdeinit}_dummy.$cxxsuffix; \\\n"; + $lines .= "\techo 'extern \"C\" KDE_EXPORT int tdeinitmain(int argc, char* argv[]) { return kdemain(argc,argv); }' >> ${tdeinit}_dummy.$cxxsuffix\n"; - push(@cleanfiles, "${kdeinit}.la.$cxxsuffix"); - push(@cleanfiles, "${kdeinit}_dummy.$cxxsuffix"); + push(@cleanfiles, "${tdeinit}.la.$cxxsuffix"); + push(@cleanfiles, "${tdeinit}_dummy.$cxxsuffix"); # add dependency - $dep_files .= " \$(DEPDIR)/${kdeinit}.la.Po" if($dep_files !~/${kdeinit}.la.Po/ ); - $dep_files .= " \$(DEPDIR)/${kdeinit}_dummy.Plo" if($dep_files !~/${kdeinit}_dummy.Plo/ ); + $dep_files .= " \$(DEPDIR)/${tdeinit}.la.Po" if($dep_files !~/${tdeinit}.la.Po/ ); + $dep_files .= " \$(DEPDIR)/${tdeinit}_dummy.Plo" if($dep_files !~/${tdeinit}_dummy.Plo/ ); # make library - $lookup = $kdeinit . '_la_LIBADD\s*=[ \t]*(.*)'; + $lookup = $tdeinit . '_la_LIBADD\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { my $libadd = $1; - substituteLine($lookup, "${kdeinit}_la_LIBADD = libkdeinit_${kdeinit}.la"); - appendLines("libkdeinit_${kdeinit}_la_LIBADD = $libadd\n"); + substituteLine($lookup, "${tdeinit}_la_LIBADD = libtdeinit_${tdeinit}.la"); + appendLines("libtdeinit_${tdeinit}_la_LIBADD = $libadd\n"); } - appendLines("libkdeinit_${kdeinit}_la_LDFLAGS = -no-undefined -avoid-version \$(all_libraries)\n"); + appendLines("libtdeinit_${tdeinit}_la_LDFLAGS = -no-undefined -avoid-version \$(all_libraries)\n"); # add library dependencies - $lookup = $kdeinit . '_la_DEPENDENCIES\s*=[ \t]*(.*)'; + $lookup = $tdeinit . '_la_DEPENDENCIES\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { my $libdeps = $1; - substituteLine($lookup, "${kdeinit}_la_DEPENDENCIES = libkdeinit_${kdeinit}.la"); - appendLines("libkdeinit_${kdeinit}_la_DEPENDENCIES = $libdeps\n"); + substituteLine($lookup, "${tdeinit}_la_DEPENDENCIES = libtdeinit_${tdeinit}.la"); + appendLines("libtdeinit_${tdeinit}_la_DEPENDENCIES = $libdeps\n"); } # make library objects - $lookup = "am_${kdeinit}_la_OBJECTS" . '\s*=[ \t]*(.*)'; + $lookup = "am_${tdeinit}_la_OBJECTS" . '\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { my $libobjects = $1; - substituteLine($lookup, "am_${kdeinit}_la_OBJECTS = ${kdeinit}_dummy.lo"); - appendLines("am_libkdeinit_${kdeinit}_la_OBJECTS = $libobjects\n"); - my $prog = "libkdeinit_${kdeinit}_la"; + substituteLine($lookup, "am_${tdeinit}_la_OBJECTS = ${tdeinit}_dummy.lo"); + appendLines("am_libtdeinit_${tdeinit}_la_OBJECTS = $libobjects\n"); + my $prog = "libtdeinit_${tdeinit}_la"; push(@programs, $prog); $realObjs{$prog} = $libobjects; - $realname{$prog} = "libkdeinit_${kdeinit}.la"; + $realname{$prog} = "libtdeinit_${tdeinit}.la"; } - $target_adds{"libkdeinit_${kdeinit}.la"} = "\$(libkdeinit_${kdeinit}_la_OBJECTS) \$(libkdeinit_${kdeinit}_la_DEPENDENCIES)\n" . - "\t\$(CXXLINK) -rpath \$(libdir) \$(libkdeinit_${kdeinit}_la_LDFLAGS) ". - "\$(libkdeinit_${kdeinit}_la_OBJECTS) " . - "\$(libkdeinit_${kdeinit}_la_LIBADD) " . + $target_adds{"libtdeinit_${tdeinit}.la"} = "\$(libtdeinit_${tdeinit}_la_OBJECTS) \$(libtdeinit_${tdeinit}_la_DEPENDENCIES)\n" . + "\t\$(CXXLINK) -rpath \$(libdir) \$(libtdeinit_${tdeinit}_la_LDFLAGS) ". + "\$(libtdeinit_${tdeinit}_la_OBJECTS) " . + "\$(libtdeinit_${tdeinit}_la_LIBADD) " . "\$(LIBS)\n"; - # make libkdeinit sources - $lookup = $kdeinit . '_la_SOURCES\s*=[ \t]*(.*)'; + # make libtdeinit sources + $lookup = $tdeinit . '_la_SOURCES\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { my $srces = $1; - $sources_changed{"libkdeinit_${kdeinit}_la"} = 1; - $sources{"libkdeinit_${kdeinit}_la"} = $srces; + $sources_changed{"libtdeinit_${tdeinit}_la"} = 1; + $sources{"libtdeinit_${tdeinit}_la"} = $srces; } - # make libkdeinit metasources - $lookup = $kdeinit . '_la_METASOURCES\s*=[ \t]*(.*)'; - substituteLine($lookup, "libkdeinit_${kdeinit}_la_METASOURCES = $1") + # make libtdeinit metasources + $lookup = $tdeinit . '_la_METASOURCES\s*=[ \t]*(.*)'; + substituteLine($lookup, "libtdeinit_${tdeinit}_la_METASOURCES = $1") if($MakefileData =~ m/\n$lookup/); =cut # make binary sources - $lookup = $kdeinit. '_SOURCES\s*=[ \t]*(.*)'; + $lookup = $tdeinit. '_SOURCES\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { - substituteLine($lookup, "${kdeinit}_SOURCES = ${kdeinit}.la.$cxxsuffix"); + substituteLine($lookup, "${tdeinit}_SOURCES = ${tdeinit}.la.$cxxsuffix"); $lookup = 'SOURCES\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { my $srces = $1; - $srces =~ s/\b$kdeinit\.c\b/\$(${kdeinit}_SOURCES)/; - $srces =~ s/\$\(${kdeinit}_la_SOURCES\)/\$(libkdeinit_${kdeinit}_la_SOURCES)/; + $srces =~ s/\b$tdeinit\.c\b/\$(${tdeinit}_SOURCES)/; + $srces =~ s/\$\(${tdeinit}_la_SOURCES\)/\$(libtdeinit_${tdeinit}_la_SOURCES)/; substituteLine($lookup, "SOURCES = $srces"); } $lookup = 'DIST_SOURCES\s*=[ \t](.*)'; if($MakefileData =~ m/\n$lookup/) { my $srces = $1; - $srces =~ s/\b$kdeinit\.c\b/\$(${kdeinit}_SOURCES)/; - $srces =~ s/\$\(${kdeinit}_la_SOURCES\)/\$(libkdeinit_${kdeinit}_la_SOURCES)/; + $srces =~ s/\b$tdeinit\.c\b/\$(${tdeinit}_SOURCES)/; + $srces =~ s/\$\(${tdeinit}_la_SOURCES\)/\$(libtdeinit_${tdeinit}_la_SOURCES)/; substituteLine($lookup, "DIST_SOURCES = $srces"); } } # make binary objects / libs - $lookup = $kdeinit . '_OBJECTS\s*=[ \t]*.*'; + $lookup = $tdeinit . '_OBJECTS\s*=[ \t]*.*'; if($MakefileData =~ m/\n$lookup/) { - $realObjs{$kdeinit} = "${kdeinit}.la.\$(OBJEXT)"; - substituteLine("${kdeinit}_LDFLAGS\\s*=.*", "${kdeinit}_LDFLAGS = \$(all_libraries)"); - substituteLine("${kdeinit}_LDADD\\s*=.*", "${kdeinit}_LDADD = libkdeinit_${kdeinit}.la"); - substituteLine("${kdeinit}_DEPENDENCIES\\s*=.*", "${kdeinit}_DEPENDENCIES = libkdeinit_${kdeinit}.la"); + $realObjs{$tdeinit} = "${tdeinit}.la.\$(OBJEXT)"; + substituteLine("${tdeinit}_LDFLAGS\\s*=.*", "${tdeinit}_LDFLAGS = \$(all_libraries)"); + substituteLine("${tdeinit}_LDADD\\s*=.*", "${tdeinit}_LDADD = libtdeinit_${tdeinit}.la"); + substituteLine("${tdeinit}_DEPENDENCIES\\s*=.*", "${tdeinit}_DEPENDENCIES = libtdeinit_${tdeinit}.la"); } =cut # add binary - push(@programs, $kdeinit); - $realObjs{$kdeinit} = "${kdeinit}.la.\$(OBJEXT)"; - $realname{$kdeinit} = $kdeinit; - $sources{$kdeinit} = "${kdeinit}.la.$cxxsuffix"; + push(@programs, $tdeinit); + $realObjs{$tdeinit} = "${tdeinit}.la.\$(OBJEXT)"; + $realname{$tdeinit} = $tdeinit; + $sources{$tdeinit} = "${tdeinit}.la.$cxxsuffix"; - $lines .= "${kdeinit}_LDFLAGS = \$(KDE_RPATH) -no-undefined \$(all_libraries)\n"; - $lines .= "${kdeinit}_LDADD = libkdeinit_${kdeinit}.la\n"; - $lines .= "${kdeinit}_DEPENDENCIES = libkdeinit_${kdeinit}.la\n"; + $lines .= "${tdeinit}_LDFLAGS = \$(KDE_RPATH) -no-undefined \$(all_libraries)\n"; + $lines .= "${tdeinit}_LDADD = libtdeinit_${tdeinit}.la\n"; + $lines .= "${tdeinit}_DEPENDENCIES = libtdeinit_${tdeinit}.la\n"; - $target_adds{"${kdeinit}\$(EXEEXT)"} = - "\$(${kdeinit}_OBJECTS) \$(${kdeinit}_DEPENDENCIES)\n" . - "\t\@rm -f ${kdeinit}\$(EXEEXT)\n" . - "\t\$(CXXLINK) \$(${kdeinit}_LDFLAGS) \$(${kdeinit}_OBJECTS) \$(${kdeinit}_LDADD) \$(LIBS)\n"; + $target_adds{"${tdeinit}\$(EXEEXT)"} = + "\$(${tdeinit}_OBJECTS) \$(${tdeinit}_DEPENDENCIES)\n" . + "\t\@rm -f ${tdeinit}\$(EXEEXT)\n" . + "\t\$(CXXLINK) \$(${tdeinit}_LDFLAGS) \$(${tdeinit}_OBJECTS) \$(${tdeinit}_LDADD) \$(LIBS)\n"; - $ltlibs .= " libkdeinit_${kdeinit}.la"; + $ltlibs .= " libtdeinit_${tdeinit}.la"; } } appendLines($lines); - # add libkdeinit target + # add libtdeinit target $lookup = 'lib_LTLIBRARIES\s*=[ \t]*(.*)'; if($MakefileData =~ m/\n$lookup/) { substituteLine($lookup, "lib_LTLIBRARIES = $1 $ltlibs"); } else { print STDERR - "Error: lib_LTLIBRARIES missing in $printname (required for kdeinit_LTLIBRARIES).\n"; + "Error: lib_LTLIBRARIES missing in $printname (required for tdeinit_LTLIBRARIES).\n"; $errorflag = 1; } } if($#progs >= 0) { if($MakefileData !~ m/\nbin_PROGRAMS\s*=/) { - print STDERR "Error: bin_PROGRAMS missing in $printname (required for kdeinit_LTLIBRARIES).\n"; + print STDERR "Error: bin_PROGRAMS missing in $printname (required for tdeinit_LTLIBRARIES).\n"; $errorflag = 1; } else { @@ -1362,7 +1362,7 @@ sub tag_UIFILES () $dep_lines .= "\trm -f $source.$cxxsuffix\n"; if (!$kdeopts{"qtonly"}) { $dep_lines .= "\techo '#include <kdialog.h>' > $source.$cxxsuffix\n"; - $dep_lines .= "\techo '#include <klocale.h>' >> $source.$cxxsuffix\n"; + $dep_lines .= "\techo '#include <tdelocale.h>' >> $source.$cxxsuffix\n"; my ($mangled_source) = $source; $mangled_source =~ s/[^A-Za-z0-9]/_/g; # get rid of garbage $dep_lines .= "\t\$(UIC) -tr \${UIC_TR} -i $source.h $sourcedir$source.ui > $source.$cxxsuffix.temp ; ret=\$\$?; \\\n"; @@ -1735,7 +1735,7 @@ sub tag_POFILES () $pofiles = join(" ", grep(/\.po$/, readdir(THISDIR))); closedir (THISDIR); print STDOUT "pofiles found = $pofiles\n" if ($verbose); - if (-f "charset" && -f "kdelibs/kdelibs.po") { + if (-f "charset" && -f "tdelibs/tdelibs.po") { handle_TOPLEVEL(); } } |