stgit.el: Move 'stgit-patch-status-face-alist' before first use

Author: MorganJamesSmith

contrib/stgit.el

@@ -334,6 +334,15 @@ format characters are recognized:
   "StGit mode face used for modified file status."
   :group 'stgit-faces)
 
+(defconst stgit-patch-status-face-alist
+  '((applied   . stgit-applied-patch-face)
+    (top       . stgit-top-patch-face)
+    (unapplied . stgit-unapplied-patch-face)
+    (committed . stgit-committed-patch-face)
+    (index     . stgit-index-work-tree-title-face)
+    (work      . stgit-index-work-tree-title-face))
+  "Alist of face to use for a given patch status.")
+
 (defun stgit (dir)
   "Manage StGit patches for the tree in DIR.
 
@@ -823,15 +832,6 @@ during the operation."
             (ignore      "Ignored"     stgit-ignored-file-face)))
   "Alist of code symbols to description strings.")
 
-(defconst stgit-patch-status-face-alist
-  '((applied   . stgit-applied-patch-face)
-    (top       . stgit-top-patch-face)
-    (unapplied . stgit-unapplied-patch-face)
-    (committed . stgit-committed-patch-face)
-    (index     . stgit-index-work-tree-title-face)
-    (work      . stgit-index-work-tree-title-face))
-  "Alist of face to use for a given patch status.")
-
 (defun stgit-file-status-code-as-string (file)
   "Return stgit status code for FILE as a string."
   (let* ((code (assq (stgit-file->status file)