From cf453c187238524742b0cfb816aa59b2ca15e9ea Mon Sep 17 00:00:00 2001
From: "Johann Potot." <pototschnig.johann@gmail.com>
Date: Sun, 14 Jun 2026 12:47:59 +0200
Subject: [PATCH] error_type from wrong file (#5393)

Co-authored-by: Johann Pototschnig <j.pototschnig@hzdr.de>
---
 src/qs_dispersion_s_dftd3.F | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/qs_dispersion_s_dftd3.F b/src/qs_dispersion_s_dftd3.F
index b940f5553e..74f3d5319d 100644
--- a/src/qs_dispersion_s_dftd3.F
+++ b/src/qs_dispersion_s_dftd3.F
@@ -17,13 +17,13 @@ MODULE qs_dispersion_s_dftd3
    USE dftd3_data_vdwrad, ONLY: get_vdw_rad
    USE dftd3_param, ONLY: d3_param, &
                           get_rational_damping, &
-                          get_zero_damping, &
-                          error_type
+                          get_zero_damping
    USE dftd3_reference, ONLY: init_reference_c6, &
                               get_c6, &
                               reference_cn, &
                               number_of_references
    USE mctc_data, ONLY: get_covalent_rad
+   USE mctc_env, ONLY: error_type
 #endif
 
 #include "./base/base_uses.f90"