Apply command line options after loading configuration

1 files changed, 7 insertions, 8 deletions

diff --git a/acmeman b/acmeman
index fdb55aa..d166a88 100755
--- a/acmeman
+++ b/acmeman
@@ -1,5 +1,5 @@
 #! /usr/bin/perl
-# Copyright (C) 2017 Sergey Poznyakoff <gray@gnu.org>
+# Copyright (C) 2017, 2018 Sergey Poznyakoff <gray@gnu.org>
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -1006,13 +1006,6 @@ sub file_type_fixup {
     exit(1) if $err;
 }
 
-if ($time_delta) {
-    $config->set(qw(core time-delta), $time_delta);
-}
-if ($check_alt_names) {
-    $config->set(qw(core check-alt-names), $check_alt_names);
-}
-
 my @domlist;
 
 @select{map { lc } @ARGV} = (1) x @ARGV;
@@ -1033,6 +1026,12 @@ if ($config->success) {
 	$obj->configure($config);
 	$config->set(qw(core source), $obj);
     }
+    if ($time_delta) {
+	$config->set(qw(core time-delta), $time_delta);
+    }
+    if ($check_alt_names) {
+	$config->set(qw(core check-alt-names), $check_alt_names);
+    }
 }
 
 unless ($config->success) {