     (if (not (file-exists-p org-wiki-file))
         ;; Action executed if file doesn't exist.
         (progn (find-file  org-wiki-file)
+               ;; Insert header at top of page
                (org-wiki-header)
+               ;; Save current page buffer
+               (save-buffer)
+               ;; Create assets directory
                (org-wiki--assets-make-dir pagename))
 
       ;; Action executed if file exists.

  (format "[[wiki:%s][%s]]" pagename pagename))

(defun org-wiki--open-page (pagename)
  "Opens a org-wiki page (PAGENAME) by name.

Example:  (org-wiki--open-page \"Linux\")
Will open the the wiki file Linux.org in
`org-wiki-location`"

                  (read-only-mode 1))
          ;; open file in writable mode. 
          (find-file  org-wiki-file))
        ))) 


