From 26fb936f2a086ec0a6157a9eedb2d6adfbb15936 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Tue, 4 Nov 2014 22:32:18 -0500 Subject: [PATCH] Fix problem with -t, --track command-line flag. --- src/initialize.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/src/initialize.F90 b/src/initialize.F90 index e0a5bf8b0c..a418b3ec32 100644 --- a/src/initialize.F90 +++ b/src/initialize.F90 @@ -434,7 +434,6 @@ contains i = i + 1 case ('-t', '-track', '--track') write_all_tracks = .true. - i = i + 1 case default call fatal_error("Unknown command line option: " // argv(i)) end select