;; Configuration for emacs-wiki ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Add the necessaries to theload-path (add-to-list 'load-path (expand-file-name "/home/tc/emacs/lisp/emacs-wiki-mwolson")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; emacs-wiki (require `emacs-wiki) (require `emacs-wiki-journal) (require `emacs-wiki-menu) ;; Change default published index file from WelcomePage to index (setq emacs-wiki-publishing-transforms '(("WelcomePage" . "index"))) ;; This is a default style sheet, but we'll override it for all projects ;; except our blog wiki. In other words, this *is* our blog wiki's style sheet (setq emacs-wiki-style-sheet "") (setq emacs-wiki-projects '( ("WebWiki" . ((emacs-wiki-directories . ("~/public_html/WebWiki")) (emacs-wiki-project-server-prefix . "../webwiki/") (emacs-wiki-style-sheet . "") (emacs-wiki-publishing-directory . "~/public_html/webwiki"))) ("PrivWiki" . ((emacs-wiki-directories . ("~/public_html/PrivWiki")) (emacs-wiki-project-server-prefix . "../privwiki/") (emacs-wiki-style-sheet . "") (emacs-wiki-publishing-directory . "~/public_html/privwiki"))) ("SharedWiki" . ((emacs-wiki-directories . ("~/public_html/SharedWiki")) (emacs-wiki-project-server-prefix . "../sharedwiki/") (emacs-wiki-style-sheet . "") (emacs-wiki-publishing-directory . "~/public_html/sharedwiki"))) )) ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Set category information (defvar my-category-personal " This contains all blog entries marked as *Personal*. In other words, they don't really belong anywhere else.") ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;; Make sure that when we start doing wiki stuff it's in the right ;; ;; place. This is required because although we have created a few ;; ;; wiki projects (our main wiki, the planner, and blosxom), there ;; ;; is a "default" wiki area that is *not* a project, is *not* used ;; ;; by us, but which is the normal starting point unless we do ;; ;; this emacs-wiki-change-project thing (emacs-wiki-change-project "WebWiki") (emacs-wiki-find-file "WelcomePage") (setq emacs-wiki-maintainer "mailto:address@hidden") (setq emacs-wiki-journal-default-category "CategoryGeneral") (setq emacs-wiki-journal-directory "~/public_html/BlogWiki") (setq emacs-wiki-journal-entries-per-page 20) (setq emacs-wiki-journal-project "BlogWiki") (setq emacs-wiki-journal-publishing-directory "~/public_html/blogwiki") (setq emacs-wiki-journal-server-prefix "../blogwiki/") (setq emacs-wiki-journal-title "TC's Journal") (setq emacs-wiki-publishing-header " <lisp>(emacs-wiki-page-title)</lisp> emacs-wiki-meta-http-equiv\" content=\"emacs-wiki-meta-content\" /> emacs-wiki-maintainer\" /> (emacs-wiki-published-name emacs-wiki-home-page)\" /> (emacs-wiki-published-name emacs-wiki-index-page)\" /> emacs-wiki-style-sheet

(emacs-wiki-page-title)

(funcall emacs-wiki-menu-factory) ") (emacs-wiki-journal-update-wiki-project)