fu: Close-up of Fu, bringing a scoop of water to her mouth (Default)
fu ([personal profile] fu) wrote in [site community profile] changelog2011-09-06 12:41 pm

[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 [personal profile] rb.

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;
 }
--------------------------------------------------------------------------------