From 594a011c6048e96ca1712c9a0945b290273cbd1e Mon Sep 17 00:00:00 2001
From: Gerhard Gonter <ggonter@gmail.com>
Date: Wed, 18 Nov 2020 21:18:38 +0100
Subject: [PATCH] additional journals, see #23610

---
 dcd.pl | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/dcd.pl b/dcd.pl
index 4db3c83..26e7ff5 100755
--- a/dcd.pl
+++ b/dcd.pl
@@ -153,15 +153,19 @@ sub register_url
   my $repo_url= shift;
 
   print __LINE__, " repo_url=[$repo_url]\n";
-  if ($repo_url =~ m#^https?://(phaidra(-(sandbox|temp))?\.univie\.ac\.at)/(detail_object|view/)?(o:\d+)$#
-      # || $repo_url =~ m# ... uscholar ... #)
+  if (# Phaidra
+      $repo_url =~ m#^https?://(phaidra(-(sandbox|temp))?\.univie\.ac\.at)/(detail_object|view/)?(o:\d+)$#
+      # OJS
       || $repo_url =~ m#https://(ojs3test\.univie\.ac\.at)/index\.php/wks/article/view/(\d+)$#
       || $repo_url =~ m#https://(wbagon\.univie\.ac\.at)/index\.php/(wbagon)/article/view/(\d+)$#
       || $repo_url =~ m#https://(rezenstfm\.univie\.ac\.at)/index\.php/(tfm)/article/view/(\d+)$#
-      || $repo_url =~ m#https://(journals\.univie\.ac\.at)/index\.php/(yis|kf|mp|oezg|wdr)/article/view/(\d+)$#
+      || $repo_url =~ m#https://(journals\.univie\.ac\.at)/index\.php/(yis|kf|mp|oezg|wdr|aaj|lili)/article/view/(\d+)$#
       || $repo_url =~ m#https://(chronotopos\.eu)/index\.php/(cts)/article/view/(\d+)$#
       || $repo_url =~ m#https://(viennalawreview\.com)/index\.php/(vlr)/article/view/(\d+)$#
       || $repo_url =~ m#https://(aseas\.univie\.ac\.at)/index\.php/(aseas)/article/view/(\d+)$#
+      || $repo_url =~ m#https://(www\.protokollezurbibel\.at)/index\.php/(pzb)/article/view/(\d+)$#
+      || $repo_url =~ m#https://(www\.tde-journal\.org)/index\.php/(tde)/article/view/(\d+)$#
+      # Othes
       || $repo_url =~ m#https://(othes\.univie\.ac\.at)/(\d+)/$#
      )
   {
-- 
GitLab