From c7e877c93f0355a7c0d9330b7a504a6ce3edc0a0 Mon Sep 17 00:00:00 2001
From: Salvatore Filippone <salvatore.filippone@cranfield.ac.uk>
Date: Wed, 16 May 2007 15:41:24 +0000
Subject: [PATCH] Fixed wrong name for act_ret.

---
 base/modules/psb_error_mod.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/base/modules/psb_error_mod.F90 b/base/modules/psb_error_mod.F90
index 9bc52503..f9fe734f 100644
--- a/base/modules/psb_error_mod.F90
+++ b/base/modules/psb_error_mod.F90
@@ -81,7 +81,7 @@ contains
   subroutine psb_erractionsave(err_act)
     integer, intent(out) :: err_act
     err_act    = err_action
-    err_action = act_ret
+    err_action = psb_act_ret_
   end subroutine psb_erractionsave