From 8c9e97139d5df864cf26361856a6c8865cf9ce1a Mon Sep 17 00:00:00 2001
From: kamischi <karl-michael.schindler@web.de>
Date: Sat, 6 Jul 2024 21:44:18 +0200
Subject: [PATCH] Tab to space conversion
---
source/f90/get_commandline_options.f90 | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/source/f90/get_commandline_options.f90 b/source/f90/get_commandline_options.f90
index 6aac322..e9977be 100644
--- a/source/f90/get_commandline_options.f90
+++ b/source/f90/get_commandline_options.f90
@@ -24,8 +24,8 @@ subroutine get_commandline_options(eelsin_name, eelsou_name, bosin_name, bosou_n
! Set up the longOpts struct to define the valid options:
! short option, long option, argument (no = 0 / yes = 1), short description
type(getopt_t) :: longOpts(8) = &
- [ &
- getopt_t('v', 'version', 0, 'Print version'), &
+ [ &
+ getopt_t('v', 'version', 0, 'Print version'), &
getopt_t('V', 'version', 0, 'Print version'), &
getopt_t('h', 'help', 0, 'Print options'), &
getopt_t('d', 'dir', 1, 'Change I/O directory'), &
@@ -45,7 +45,7 @@ subroutine get_commandline_options(eelsin_name, eelsou_name, bosin_name, bosou_n
! Do different things depending on the option returned:
select case(option)
- case('d') ! Change I/O directory
+ case('d') ! Change I/O directory
status = chdir(trim(optArg))
if (status /= 0) then
write (*,*) 'WARNING: change directory failed!'
--
GitLab