From 1a0ed8f42f1d0bff807d906a986855fe49bad710 Mon Sep 17 00:00:00 2001
From: Frederic Berger <79266080+Edinbro@users.noreply.github.com>
Date: Thu, 18 Feb 2021 16:56:18 +0000
Subject: [PATCH] Update apalike-refs.bst

---
 apalike-refs.bst | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/apalike-refs.bst b/apalike-refs.bst
index 50ac127..4cc32f6 100644
--- a/apalike-refs.bst
+++ b/apalike-refs.bst
@@ -416,9 +416,11 @@ FUNCTION {format.issn}
 	split.at.first.space
 	'rem :=
 	'str :=
-	% If you find an open search engine for ISSN, please tell to the author.
-	% To make it a URL, pay attention: there might have a coma, so purify before.
-	" {\ttfamily " * str escape.url.characters * "}" *
+	str #1 #1 substring$
+	is.number.character
+	  {" \href{https://portal.issn.org/resource/ISSN/" * str * "}{\ttfamily " * str escape.url.characters * "}" *}
+	  {" " * str escape.url.characters *}
+	if$
 	rem
       }
       while$