diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 574f50a4a1e5..0d04224a71b0 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,6 +1,6 @@
 2019-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
-	PR fortran/43072
+	PR fortran/43136
 	* resolve.c (resolve_array_ref): Add equal_length argument; set it
 	if the length of the substring equals that of the orignal
 	variable.
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 9c9299e074ca..ec8a0c18c70e 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,6 +1,6 @@
 2019-01-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
-	PR fortran/43072
+	PR fortran/43136
 	* gfortran.dg/actual_array_substr_3.f90: New test.
 
 2019-01-15  Steven G. Kargl  <kargl@gcc.gnu.org>