Fix project-to-workspace code + add init-accounts

Change-Id: I6833459f3d5c4a96260f776f372c01340786d18e

gerrit.el

@@ -1282,6 +1282,7 @@ current project."
                                  ;; TODO add support for other filter options
                                  (t
                                   nil))))))))
+  (gerrit--init-accounts)
   (gerrit-download--new changenr))
 
 (defun gerrit-download:--in-known-repo (changenr)
@@ -1299,14 +1300,15 @@ workspace of the project."
        ;; branch:...?)
        gerrit-interesting-open-changes-filter))))
 
+  (gerrit--init-accounts)
   ;; 1) get change metadata
   ;; 2) determine workspace directory (based on branch and projectname)
   ;; 3) switch to workspace
   ;; 4) download change
   (let* ((change-metadata (car (gerrit-rest-change-query changenr)))
          (project-name (alist-get 'project change-metadata))
          (branch (alist-get 'branch change-metadata))
-         (workspace-directory (or (cdr (assoc (list project-name branch)
+         (workspace-directory (or (cadr (assoc (list project-name branch)
                                               gerrit-project-to-local-workspace-alist))
                                   ;; TODO completion + write them to file
                                   (read-directory-name