           (profile-set-grep-dirs name)
           (profile-set-mode-line-from-include-files name)
           (profile-set-sml-and-registers-from-build-sub-dirs name)
+          (bmkp-switch-bookmark-file-create
+           (concat
+            (profile-get name 'remote-prefix)
+            (profile-get name 'project-root-dir)
+            "repo.bmk") t)
           )
       ('profile-error-non-fatal
+       (profile-put name 'profile-inited nil)
        (message "Stopped loading profile \"%s\" (%s)" name (cdr err)))
-      ('profile-error-aborted
+      ((profile-error-aborted profile-error)
+       (ignore-errors
+         (profile-put name 'profile-inited nil))
        (error (cdr err)))
-      ('profile-error
-       (message "Generic profile error: %s" (cdr err)))
     )))
 
 ;;;###autoload

;; Author: Dan Harms <danielrharms@gmail.com>
;; Created: Saturday, February 28, 2015
;; Version: 1.0
;; Modified Time-stamp: <2016-05-26 17:06:07 dan.harms>
;; Keywords:

;; This program is free software; you can redistribute it and/or modify

    (when (and profile-current
               (not (profile-current-get 'profile-inited t)))
      ;; run this init code once per profile loaded
      (profile-current-put 'profile-inited t)
      (when remote-host
        (profile-current-put 'remote-host remote-host))
      (when remote-prefix
