[cdftools] 189/228: JMM : suppress verbosity in SetFileName ( most of the time gridS file not found filled up the log files)

[Alastair McKinstry]

This is an automated email from the git hooks/post-receive script.

mckinstry pushed a commit to branch master
in repository cdftools.

commit 2f0667654505f3a8e04218b44acafc06f75ea720
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Tue Dec 11 07:57:08 2012 +0000

    JMM : suppress verbosity in SetFileName ( most of the time gridS file not found filled up the log files)
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@637 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 modutils.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/modutils.f90 b/modutils.f90
index 06ca13e..35c8dd9 100644
--- a/modutils.f90
+++ b/modutils.f90
@@ -90,9 +90,9 @@ CONTAINS
     ENDIF
 
     WRITE( SetFileName,'(a,"_",a,"_grid",a,".nc")') TRIM(cdconf), TRIM(cdtag), TRIM(cdgrid)
-    IF ( chkfile(SetFileName ) ) THEN ! look for another name
+    IF ( chkfile(SetFileName ,ld_verbose=.FALSE.) ) THEN ! look for another name
        WRITE(SetFileName,'(a,"_",a,"_grid_",a,".nc")') TRIM(cdconf), TRIM(cdtag), TRIM(cdgrid)
-       IF ( chkfile( SetFileName) .AND. ll_stop  ) THEN
+       IF ( chkfile( SetFileName, ld_verbose=.FALSE.) .AND. ll_stop  ) THEN
           PRINT *,' ERROR : missing grid',TRIM(cdgrid),'or even grid_',TRIM(cdgrid),' file '
           STOP
        ENDIF

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/cdftools.git