elserv (0.4.0+0.20011203cvs-17.1) 04_emacs-wiki-default-directory

#! /bin/sh /usr/share/dpatch/dpatch-run
## emacs-wiki-default-directory.dpatch by Junichi Uekawa <dancer@debian.org>
##
## All lines beginning with `## DP:' are a description of the patch.
## DP: Set default directory to ~/Wiki

@DPATCH@
diff -urNad elserv-0.4.0+0.20011203cvs~/es-wiki.el elserv-0.4.0+0.20011203cvs/es-wiki.el
--- elserv-0.4.0+0.20011203cvs~/es-wiki.el	2006-09-21 08:20:03.885278136 +0900
+++ elserv-0.4.0+0.20011203cvs/es-wiki.el	2006-09-21 08:21:17.090149304 +0900
@@ -276,6 +276,7 @@
 				    (unless (string= ppath "/") ppath)
 				    path "/"))
     (let ((emacs-wiki-serving-p t)
+	  (default-directory (expand-file-name "~/Wiki"))
 	  (emacs-wiki-publishing-footer elserv-wiki-publishing-footer))
       (cond
        ((string= path "/")		; default page.