From c772d90f30dfc5f6d989616956145d51dca0b69a Mon Sep 17 00:00:00 2001 From: Eisuke Kawashima Date: Sun, 9 Feb 2020 01:54:51 +0900 Subject: [PATCH] Update DOI resolver https://www.doi.org/doi_handbook/2_Numbering.html#htmlencoding --- data/BASIS_ZIJLSTRA | 2 +- data/BASIS_pob | 2 +- src/common/bibliography.F | 6 +++--- src/common/reference_manager.F | 6 +++--- 4 files changed, 8 insertions(+), 8 deletions(-) diff --git a/data/BASIS_ZIJLSTRA b/data/BASIS_ZIJLSTRA index bbcdb53511..016638d225 100644 --- a/data/BASIS_ZIJLSTRA +++ b/data/BASIS_ZIJLSTRA @@ -1,6 +1,6 @@ # # from Eeuwe S Zijlstra et al 2009 Modelling Simul. Mater. Sci. Eng. 17 015009 (10pp) doi: 10.1088/0965-0393/17/1/015009 -# http://dx.doi.org/10.1088/0965-0393/17/1/015009 +# https://doi.org/10.1088/0965-0393/17/1/015009 # # 2SP, 3SP, 4SP basis sets for GTH pseudos (with 3SP being the author's recommendation). # diff --git a/data/BASIS_pob b/data/BASIS_pob index 43ca36654a..5272c34205 100644 --- a/data/BASIS_pob +++ b/data/BASIS_pob @@ -17,7 +17,7 @@ #journal = {Journal of Computational Chemistry}, #publisher = {Wiley Subscription Services, Inc., A Wiley Company}, #issn = {1096-987X}, -#url = {http://dx.doi.org/10.1002/jcc.23153}, +#url = {https://doi.org/10.1002/jcc.23153}, #doi = {10.1002/jcc.23153}, #pages = {451--459}, #keywords = {CRYSTAL, basis sets, TZVP, solid-state calculations}, diff --git a/src/common/bibliography.F b/src/common/bibliography.F index fb8ee73136..90e0d9fa99 100644 --- a/src/common/bibliography.F +++ b/src/common/bibliography.F @@ -2768,7 +2768,7 @@ CONTAINS "EP 666", & "PD MAR 18", & "PY 2002", & - "UR https://dx.doi.org/10.1002/jcc.10069", & + "UR https://doi.org/10.1002/jcc.10069", & "ER"), & DOI="10.1002/jcc.10069") @@ -2788,7 +2788,7 @@ CONTAINS "AR 064102", & "PD FEB 8", & "PY 2012", & - "UR https://dx.doi.org/10.1063/1.3676407", & + "UR https://doi.org/10.1063/1.3676407", & "ER"), & DOI="10.1063/1.3676407") @@ -3704,7 +3704,7 @@ CONTAINS "AU VandeVondele, Joost", & "VL John Wiley & Sons, Ltd", & "SN 9781118670712", & - "UR https://dx.doi.org/10.1002/9781118670712.ch8", & + "UR https://doi.org/10.1002/9781118670712.ch8", & "DO 10.1002/9781118670712.ch8", & "BP 173", & "EP 190", & diff --git a/src/common/reference_manager.F b/src/common/reference_manager.F index c5dc5c0ca4..aa8a6ece97 100644 --- a/src/common/reference_manager.F +++ b/src/common/reference_manager.F @@ -52,7 +52,7 @@ MODULE reference_manager PRIVATE ! the reference in a format as returned by the web of science CHARACTER(LEN=ISI_length), DIMENSION(:), POINTER :: ISI_record - ! the doi only, i.e. without "https://dx.doi.org/" + ! the doi only, i.e. without "https://doi.org/" CHARACTER(LEN=doi_length) :: DOI ! has this reference been cited in the program run LOGICAL :: is_cited @@ -421,7 +421,7 @@ CONTAINS ! DOI IF (thebib(key)%ref%DOI .NE. "") THEN - WRITE (unit, '(T2,A)') "https://dx.doi.org/"//TRIM(thebib(key)%ref%DOI) + WRITE (unit, '(T2,A)') "https://doi.org/"//TRIM(thebib(key)%ref%DOI) ENDIF END SUBROUTINE print_reference_journal @@ -457,7 +457,7 @@ CONTAINS ! DOI IF (thebib(key)%ref%DOI .NE. "") THEN - WRITE (unit, '(T2,A)', ADVANCE="NO") '' + WRITE (unit, '(T2,A)', ADVANCE="NO") '' ENDIF ! Journal, volume (issue), pages (year). journal = TRIM(get_source(thebib(key)%ref%ISI_record))