[cdftools] 192/228: JMM : bug fix in cdfstd.f90 ( GS)
Alastair McKinstry
mckinstry at moszumanska.debian.org
Fri Jun 12 08:21:48 UTC 2015
This is an automated email from the git hooks/post-receive script.
mckinstry pushed a commit to branch master
in repository cdftools.
commit 0e1c8f2173479337f6ad34d1bc7ccca84fbc0b06
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date: Thu Feb 7 14:40:49 2013 +0000
JMM : bug fix in cdfstd.f90 ( GS)
git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@640 1055176f-818a-41d9-83e1-73fbe5b947c5
---
cdfstd.f90 | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/cdfstd.f90 b/cdfstd.f90
index b299082..64bcc98 100644
--- a/cdfstd.f90
+++ b/cdfstd.f90
@@ -98,7 +98,8 @@ PROGRAM cdfstd
CASE ( '-save' )
lsave = .true.
CASE DEFAULT
- CALL getarg (ijarg, cf_in) ; ijarg = ijarg + 1
+ cf_in = cldum
+! CALL getarg (ijarg, cf_in) ; ijarg = ijarg + 1
EXIT ! got the first file
END SELECT
END DO
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/cdftools.git
More information about the debian-science-commits
mailing list