web: Do not build an index.
authorWerner Koch <wk@gnupg.org>
Tue, 19 Jul 2016 13:07:54 +0000 (15:07 +0200)
committerWerner Koch <wk@gnupg.org>
Tue, 19 Jul 2016 13:07:54 +0000 (15:07 +0200)
* tools/build-website.sh: Disable VC backends.
* web/share/gpgweb.el (gpgweb-setup-project): Do not build the index.
--

The index requires an change in org-mode because our goal is to be
able to build from a read-only checkout.  Even w/o the index there is
still a problem building it because our use of org-publish-find-title
in gpgweb-postprocess-html results in an access to a killed buffer if
the checkout is read-only.

The actual plan is to build the web site from a script which delegates
the actual building to a separate user with limited permissions.
After the building the rendered files are copied to the web server
dir.  The command to run the rendering will be

  userv otheruser gpgweb-render

with the userv script for otheruser

=============================================
If ( glob calling-user myuser
     & glob service gpgweb-render
   )
       reset
       suppress-args
       cd /home/wk/s
       execute /home/myuser/bin/build-www.gnupg.org.sh --render
else
       error Nothing to do for this user and service
fi
quit
=============================================

tools/build-website.sh
web/share/gpgweb.el

index e5a2002..805970a 100755 (executable)
@@ -36,6 +36,7 @@ emacs23 -q --batch  \
   --eval "(require 'assoc)" \
   --eval "(require 'org)" \
   --eval "(setq make-backup-files nil)" \
+  --eval "(setq vc-handled-backends nil)" \
   --eval "(setq gpgweb-root-dir  \"${root_dir}/\")" \
   --eval "(setq gpgweb-stage-dir \"${stage_dir}/\")" \
   --eval "(require 'gpgweb (concat gpgweb-root-dir \"share/gpgweb.el\"))" \
@@ -44,7 +45,7 @@ emacs23 -q --batch  \
   --eval "(setq org-export-html-coding-system 'utf-8)" \
   --eval "(gpgweb-setup-project)" \
   --eval "(org-publish-initialize-cache \"gpgweb\")" \
-  --eval "(message \"root=(%s)\" gpgweb-root-dir)" \
+  --eval "(setq debug-on-error nil)" \
   --eval "(org-publish \"gpgweb\" t nil)"
 
 echo "$rev" > ${stage_dir}/.revlast
index a1e9556..7458dfe 100644 (file)
@@ -2,6 +2,8 @@
 
 (require 'org-exp)
 
+;; makeindex disabled because the generated file is created in the
+;; source directory.
 (defun gpgweb-setup-project ()
   "Set up an org-publish project for the gnupg.org website."
   (progn
@@ -18,7 +20,7 @@
      :section-numbers nil
      :tags nil
      :with-toc nil
-     :makeindex t
+     :makeindex nil
      :auto-sitemap nil
      :sitemap-title "GnuPG - Sitemap"
      :sitemap-sort-folders "last"