r24752 MediaWiki - Code Review archive

Repository:MediaWiki
Revision:r24751‎ | r24752 | r24753 >
Date:18:04, 13 August 2007
Author:kim
Status:old
Tags:
Comment:
Still working on pl scripts for large scale code modification. faster,
faster! (Too bad this only really needs doing once)
Modified paths:
  • /trunk/extensions/Wikidata/OmegaWiki/small/go.sh (added) (history)
  • /trunk/extensions/Wikidata/OmegaWiki/small/ra3.pl (modified) (history)

Diff [purge]

Index: trunk/extensions/Wikidata/OmegaWiki/small/ra3.pl
@@ -83,11 +83,11 @@
8484 }
8585
8686 foreach my $item (@tomatch) {
87 - #print ">".@$item[0].",".@$item[1]."\n";
8887 my $name=@$item[0];
8988 my $type=@$item[1];
90 - my $ending=$type unless $type=="Attribute";
91 - $statement=~s/\$($name)$type(\W)/\$o\-\>${name}${ending}$2/gm;
 89+ my $ending=$type unless $type eq "Attribute";
 90+ #print ">>>> n: $name t: $type e: $ending\n";
 91+ $statement=~s/\$${name}${type}/\$o\-\>${name}${ending}/gm;
9292 }
9393 $statement=~s/->getAttributeValue\(\s*\$o->(\w+)\s*\)/->$1/g;
9494 $statement=~s/\-\>setAttributeValue\(\s*\$o->(\w+)\s*,\s*(.*)\s*\)/->$1 = $2/g;
Index: trunk/extensions/Wikidata/OmegaWiki/small/go.sh
@@ -0,0 +1,6 @@
 2+#!/bin/sh
 3+
 4+svn revert *.php
 5+for a in *.php; do small/autoreplace.sh $a; done;
 6+cp done/* .
 7+
Property changes on: trunk/extensions/Wikidata/OmegaWiki/small/go.sh
___________________________________________________________________
Added: svn:executable
18 + *

Status & tagging log