From 2e6a941d2511c511837e16cfe266e86a32d52f32 Mon Sep 17 00:00:00 2001
From: Dimitri Fontaine <dim@tapoueh.org>
Date: Fri, 15 Feb 2019 21:18:38 +0100
Subject: [PATCH] Restore --list-encodings option.

It got broken, somehow. Let's move it further up the chain of command line
option processing.

Fixed #909.
---
 src/main.lisp | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/main.lisp b/src/main.lisp
index ba75c04..8d63e35 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -225,6 +225,11 @@
             (let ((*self-upgraded-already* t))
               (main argv))))
 
+        ;; --list-encodings, -E
+	(when list-encodings
+	  (show-encodings)
+	  (uiop:quit +os-code-success+))
+
 	;; First care about the root directory where pgloader is supposed to
 	;; output its data logs and reject files
         (let ((root-dir-truename (or (probe-file root-dir)
@@ -268,10 +273,6 @@
           (usage argv)
           (uiop:quit +os-code-error-usage+))
 
-	(when list-encodings
-	  (show-encodings)
-	  (uiop:quit +os-code-success+))
-
 	(when upgrade-config
 	  (loop for filename in arguments
 	     do