[dw-free] user tag should alias archiveofourown.org to ao3.org
[commit: http://hg.dwscoalition.org/dw-free/rev/c9fe0aa10ee5]
http://bugs.dwscoalition.org/show_bug.cgi?id=3887
site="ao3.org" => site="archiveofourown.org"
Patch by
rb.
Files modified:
http://bugs.dwscoalition.org/show_bug.cgi?id=3887
site="ao3.org" => site="archiveofourown.org"
Patch by
![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
Files modified:
- cgi-bin/DW/External/Site.pm
- cgi-bin/DW/External/Site/ArchiveofOurOwn.pm
-------------------------------------------------------------------------------- diff -r 751c3341fa10 -r c9fe0aa10ee5 cgi-bin/DW/External/Site.pm --- a/cgi-bin/DW/External/Site.pm Tue Sep 06 19:47:14 2011 +0800 +++ b/cgi-bin/DW/External/Site.pm Tue Sep 06 20:40:57 2011 +0800 @@ -37,6 +37,7 @@ $domaintosite{"journalfen.net"} = DW::External::Site->new("6", "www.journalfen.net", "journalfen.net", "JournalFen", "lj"); $domaintosite{"dreamwidth.org"} = DW::External::Site->new("7", "www.dreamwidth.org", "dreamwidth.org", "Dreamwidth", "lj"); $domaintosite{"archiveofourown.org"} = DW::External::Site->new("8", "www.archiveofourown.org", "archiveofourown.org", "ArchiveofOurOwn", "AO3"); +$domaintosite{"ao3.org"} = $domaintosite{"archiveofourown.org"}; $domaintosite{"twitter.com"} = DW::External::Site->new("9", "twitter.com", "twitter.com", "Twitter", "Twitter"); $domaintosite{"tumblr.com"} = DW::External::Site->new("10", "tumblr.com", "tumblr.com", "Tumblr", "Tumblr"); $domaintosite{"etsy.com"} = DW::External::Site->new("11", "www.etsy.com", "etsy.com", "Etsy", "Etsy"); diff -r 751c3341fa10 -r c9fe0aa10ee5 cgi-bin/DW/External/Site/ArchiveofOurOwn.pm --- a/cgi-bin/DW/External/Site/ArchiveofOurOwn.pm Tue Sep 06 19:47:14 2011 +0800 +++ b/cgi-bin/DW/External/Site/ArchiveofOurOwn.pm Tue Sep 06 20:40:57 2011 +0800 @@ -30,9 +30,10 @@ sub accepts { my ( $class, $parts ) = @_; - # allows anything at archiveofourown.org + # allows anything at archiveofourown.org and ao3.org return 0 unless $parts->[-1] eq 'org' && - $parts->[-2] eq 'archiveofourown'; + ( $parts->[-2] eq 'archiveofourown' || + $parts->[-2] eq 'ao3' ); return bless { hostname => 'archiveofourown.org' }, $class; } --------------------------------------------------------------------------------