diff --git a/doc/tinmop.org b/doc/tinmop.org
index 0094143..2a26e4d 100644
--- a/doc/tinmop.org
+++ b/doc/tinmop.org
@@ -47,7 +47,7 @@
   + -U, --gemini-gui-client-only     :: Start the program as A gemini GUI client
   + -S, --gemini-gui-server-only     :: Start as gemini gui server only
   + -v, --version                    :: Print program version and exit
-  + --fediverse-account              :: Specify a fediverse user account (format: user-name@server-name)
+  + -F, --fediverse-account          :: Specify a fediverse user account (format: user-name@server-name)
 
 * Usage
 
diff --git a/src/command-line.lisp b/src/command-line.lisp
index 99573d7..30ececf 100644
--- a/src/command-line.lisp
+++ b/src/command-line.lisp
@@ -93,6 +93,7 @@
        :description               (_ "Specify a fediverse user account (format: user-name@server-name).")
        :meta-var                  (_ "FEDIVERSE-ACCOUNT")
        :arg-parser                #'identity
+       :short                     #\F
        :long                      "fediverse-account")
       (:name :print-lisp-dependencies
        :description               (_ "Download lisp libraries (useful for packaging only).")