diff --git a/SRC/chbgv.f b/SRC/chbgv.f
index 130594a0f2..3f84ff5d96 100644
--- a/SRC/chbgv.f
+++ b/SRC/chbgv.f
@@ -235,7 +235,7 @@ SUBROUTINE CHBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z,
          INFO = -12
       END IF
       IF( INFO.NE.0 ) THEN
-         CALL XERBLA( 'CHBGV ', -INFO )
+         CALL XERBLA( 'CHBGV', -INFO )
          RETURN
       END IF
 *
diff --git a/SRC/dsbgv.f b/SRC/dsbgv.f
index b49df0063e..9bb07a1fa2 100644
--- a/SRC/dsbgv.f
+++ b/SRC/dsbgv.f
@@ -228,7 +228,7 @@ SUBROUTINE DSBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z,
          INFO = -12
       END IF
       IF( INFO.NE.0 ) THEN
-         CALL XERBLA( 'DSBGV ', -INFO )
+         CALL XERBLA( 'DSBGV', -INFO )
          RETURN
       END IF
 *
diff --git a/SRC/ssbgv.f b/SRC/ssbgv.f
index 0a7f73e0a8..8930867658 100644
--- a/SRC/ssbgv.f
+++ b/SRC/ssbgv.f
@@ -228,7 +228,7 @@ SUBROUTINE SSBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z,
          INFO = -12
       END IF
       IF( INFO.NE.0 ) THEN
-         CALL XERBLA( 'SSBGV ', -INFO )
+         CALL XERBLA( 'SSBGV', -INFO )
          RETURN
       END IF
 *
diff --git a/SRC/zhbgv.f b/SRC/zhbgv.f
index 2d587bd027..297ad6da73 100644
--- a/SRC/zhbgv.f
+++ b/SRC/zhbgv.f
@@ -235,7 +235,7 @@ SUBROUTINE ZHBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z,
          INFO = -12
       END IF
       IF( INFO.NE.0 ) THEN
-         CALL XERBLA( 'ZHBGV ', -INFO )
+         CALL XERBLA( 'ZHBGV', -INFO )
          RETURN
       END IF
 *