2842
Comment: add version of script that fixes the munged page
|
297
|
Deletions are marked like this. | Additions are marked like this. |
Line 1: | Line 1: |
= Status of wiki.debian.net migration = == Done == * Mon 5 Sep 2005, 17:41:14 UTC: [http://wiki.wolffelaar.nl wiki.wolffelaar.nl] is the output of my [http://www.wolffelaar.nl/~jeroen/kwiki2moinmoin/ current version of conversion scripts] -- not much in the way of markup conversion, but revision history etc is there. Help with markup conversion badly wanted (in perl, please) --["Jeroen"] * [http://wiki.debian.net wiki.debian.net] is read-only ''(Update: as long as conversion isn't ready yet to be done, it's read/write again)'', and a dump of the database is [http://people.debian.org/~ivey available] * A script to convert the RCS files into moin moin revision files is fairly easy and will be done by ["Jeroen"]. * A script to convert the markup from kwiki to moin moin needs to be written, see below. * establish copyright/licencing situation for old and new sites (WikiLicencingTerms) (sorry) == TODO == * Convert markup (see below). * Test [http://wiki.wolffelaar.nl wiki.wolffelaar.nl] to spot problems in the conversion scripts by ["Jeroen"]. === Convert markup === Any snippets appreciated. Todo: * This page looks totally ruined by the conversion: http://wiki.wolffelaar.nl/DebConf5TodoConferenceManagementSystem * The version of the script currently below fixes this page (although, WIKINAME may be overspecified below... I don't know what the actual regex is for automated links in the original wiki...) * !AbcDef must become the proper moin moin equivalent * It may be easier to just set bang_meta to true, since the methods of escaping these really suck in MoinMoin. * Some links don't convert correctly (bottom of http://wiki.wolffelaar.nl/DebConf6Meetings) * This can be fixed via something like: {{{#!perl $data =~ s/\[([^]]+) ([^] ]+)\]/[wiki:Self:$2 $1]/g; }}} * Misc other markup issues For testing the markup conversion, the following snippit may be useful: Just {{{perl foo < bleh_test|less}}} it. {{{#!/usr/bin/perl my $WIKINAME = '[A-Z]\w*[A-Z]\w*'; while (<>) { my $data = $_; #$data =~ s/_(\w)/''$1/g; #$data =~ s/(\w)_/$1''/g; # asuffield #$data =~ s/\b_(\S+)_\b/''$1''/g; # HelmutG $data =~ s/^(\*+) /' '." " x (length($1)-1) . "* "/ge; $data =~ s/^(0+) /' '." " x (length($1)-1) . "1 "/ge; $data =~ s/(_[^_]+_)/_$1_/g; $data =~ s{\[([^\]]+?)\s+($WIKINAME)\]}{qq([wiki:Self:$2 $1])}xeg; $data =~ s!\[([^]]+) ([a-z]{3,5}://[^ ]+) ([^]]+)\]!\[$2 $1 $3\]!g; # jvw $data =~ s/\*([^\n]+)\*/'''$1'''/g; #$data =~ s/^''' / \* /gm; $data =~ s/\[([a-zA-Z0-9]+)\]/["$1"]/g; #$data =~ s/\[([^]]+) ([^] ]+)\]/[wiki:Self:$2 $1]/g; $data =~ s/\[=([^]]+)\]/{{{$1}}}/g; $data =~ s/!([A-Z]a-z]+)/{{{$1}}}/g; $data =~ s/^(=+) (.*[^=])(\n)$/$1 $2 $1$3/gm; $data =~ s/\|/\|\|/g; print $data; } }}} |
I'm Ramon (27) from Rzeszow, Poland. <<BR>><<BR>> I'm learning Danish literature at a local university and I'm just about to graduate.<<BR>><<BR>> I have a part time job in a backery.<<BR>><<BR>> <<BR>><<BR>> Feel free to surf to my blog ... [[http://www.fashionjewelries.com|shell jewelry]] |
I'm Ramon (27) from Rzeszow, Poland.
I'm learning Danish literature at a local university and I'm just about to graduate.
I have a part time job in a backery.
Feel free to surf to my blog ... shell jewelry