summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJaromil <jaromil@dyne.org>2013-09-03 13:31:45 (GMT)
committer Jaromil <jaromil@dyne.org>2013-09-03 14:03:13 (GMT)
commit45356e59cb19db42df01989f04d7763e5fd125df (patch)
tree2e9d02b4aee3fde03887f08fd76150f9f12e7d06
parent9b35b7d2da8a116950a37cad5944faec39181b38 (diff)
cleanup
old website removed and goom layer obsoleted
-rw-r--r--configure.ac40
-rw-r--r--doc/images/NIMK.NL-Logo.png (renamed from web/images/NIMK.NL-Logo.png)bin5339 -> 5339 bytes
-rw-r--r--doc/images/digitalepioniers.png (renamed from web/images/digitalepioniers.png)bin24001 -> 24001 bytes
-rw-r--r--doc/images/dyne-at-wintercamp.jpg (renamed from web/images/dyne-at-wintercamp.jpg)bin78494 -> 78494 bytes
-rw-r--r--doc/images/freej-at-piksel2005.jpg (renamed from web/images/freej-at-piksel2005.jpg)bin55067 -> 55067 bytes
-rw-r--r--doc/images/globe.png (renamed from web/images/globe.png)bin3383 -> 3383 bytes
-rw-r--r--doc/images/ipernav-trans.png (renamed from web/images/ipernav-trans.png)bin18232 -> 18232 bytes
-rw-r--r--doc/images/keyz-flat2.jpg (renamed from web/images/keyz-flat2.jpg)bin169647 -> 169647 bytes
-rw-r--r--doc/images/mask-sospesa-psico.jpg (renamed from web/images/mask-sospesa-psico.jpg)bin16373 -> 16373 bytes
-rw-r--r--doc/images/osalliance.png (renamed from web/images/osalliance.png)bin14585 -> 14585 bytes
-rw-r--r--doc/images/tutorial-screenshot.jpg (renamed from web/images/tutorial-screenshot.jpg)bin40398 -> 40398 bytes
-rw-r--r--doc/old-webpage.org (renamed from web/index.org)0
-rw-r--r--src/Makefile.am4
-rw-r--r--src/obsolete/goom_layer.cpp (renamed from src/goom_layer.cpp)0
-rw-r--r--src/obsolete/goom_layer_js.cpp (renamed from src/goom_layer_js.cpp)0
-rw-r--r--web/Makefile41
-rw-r--r--web/README25
-rwxr-xr-xweb/bin/generate-apache-conf.sh42
-rwxr-xr-xweb/bin/org-split-body-toc.sh64
-rw-r--r--web/elisp/color-theme.el1668
-rw-r--r--web/elisp/org-batch.el27
-rw-r--r--web/elisp/themes/color-theme-twilight.el69
-rw-r--r--web/helpers.inc.php44
-rw-r--r--web/index.php59
-rw-r--r--web/stylesheets/dyne.css131
-rw-r--r--web/stylesheets/dyne5.css530
-rw-r--r--web/stylesheets/org-htmlize-src.css1724
-rw-r--r--web/stylesheets/org-mode.css109
-rw-r--r--web/templates/_footer.tpl55
-rw-r--r--web/templates/_header.tpl53
-rw-r--r--web/templates/software/doctypes.tpl7
31 files changed, 4 insertions, 4688 deletions
diff --git a/configure.ac b/configure.ac
index dba9afc..9131f85 100644
--- a/configure.ac
+++ b/configure.ac
@@ -594,33 +594,6 @@ PKG_CHECK_MODULES(SAMPLERATE, samplerate, :,
AC_DEFINE(WITH_AUDIO,1,[define if compiling audio system])
-## goom removed because gives compilation problems
-## replicated on Niels ubuntu 7.10
-#if test 1 = 0; then
-# enable_goom=yes
-# AM_PROG_LEX
-# AC_PROG_YACC
-# AC_CHECK_HEADERS([stddef.h libintl.h malloc.h])
-# AC_FUNC_ALLOCA
-# AC_CHECK_FUNCS([strtol])
-#
-# AC_DEFINE(WITH_GOOM,1,[define if goom is enabled])
-# GOOM_LIBS="\$(top_builddir)/lib/goom/libgoom2.a"
-# GOOM_CFLAGS="-I\$(top_srcdir)/lib/goom"
-# if test x$have_ppc = xyes; then
-# GOOM_PPC_FILES="ppc_zoom_ultimate.s ppc_drawings.s"
-# fi
-#else
-# enable_goom=no
-#fi
-#AC_SUBST(GOOM_LIBS)
-#AC_SUBST(GOOM_CFLAGS)
-#AC_SUBST(GOOM_PPC_FILES)
-
-enable_goom=no
-AM_CONDITIONAL([BUILD_GOOM], [test x$enable_goom = xyes])
-
-
dnl ==============================================================
dnl compile including the javascript interpreter
dnl ==============================================================
@@ -970,8 +943,7 @@ dnl ==============================================================
FREEJ_STATIC_CFLAGS="-I\$(top_srcdir)/src/include \
-I\$(top_srcdir)/lib/ccvt \
-I\$(top_srcdir)/lib/slw \
- \$(FLASH_CFLAGS) \
- \$(GOOM_CFLAGS)"
+ \$(FLASH_CFLAGS)"
AC_SUBST(FREEJ_STATIC_CFLAGS)
FREEJ_CFLAGS="\$(FREEJ_STATIC_CFLAGS) \
@@ -998,8 +970,7 @@ AC_SUBST(FREEJ_CFLAGS)
FREEJ_STATIC_LIBS="\$(top_builddir)/lib/ccvt/libccvt.la \
\$(top_builddir)/lib/slw/libslw.la \
- \$(FLASH_LIBS) \
- \$(GOOM_LIBS)"
+ \$(FLASH_LIBS)"
AC_SUBST(FREEJ_STATIC_LIBS)
FREEJ_LIBS="-lpthread -lm -lrt $DL_LIBS \
@@ -1279,13 +1250,6 @@ else
INFO(no)
fi
-INFO_N([= goom layer : ])
-if test x$enable_goom = xyes; then
- INFO(yes)
-else
- INFO(no)
-fi
-
INFO_N([= OpenCV cam layer : ])
if test x$have_opencv = xyes; then
INFO(yes)
diff --git a/web/images/NIMK.NL-Logo.png b/doc/images/NIMK.NL-Logo.png
index f678a6a..f678a6a 100644
--- a/web/images/NIMK.NL-Logo.png
+++ b/doc/images/NIMK.NL-Logo.png
Binary files differ
diff --git a/web/images/digitalepioniers.png b/doc/images/digitalepioniers.png
index d35a959..d35a959 100644
--- a/web/images/digitalepioniers.png
+++ b/doc/images/digitalepioniers.png
Binary files differ
diff --git a/web/images/dyne-at-wintercamp.jpg b/doc/images/dyne-at-wintercamp.jpg
index 344a0f2..344a0f2 100644
--- a/web/images/dyne-at-wintercamp.jpg
+++ b/doc/images/dyne-at-wintercamp.jpg
Binary files differ
diff --git a/web/images/freej-at-piksel2005.jpg b/doc/images/freej-at-piksel2005.jpg
index 2090729..2090729 100644
--- a/web/images/freej-at-piksel2005.jpg
+++ b/doc/images/freej-at-piksel2005.jpg
Binary files differ
diff --git a/web/images/globe.png b/doc/images/globe.png
index 1e530c8..1e530c8 100644
--- a/web/images/globe.png
+++ b/doc/images/globe.png
Binary files differ
diff --git a/web/images/ipernav-trans.png b/doc/images/ipernav-trans.png
index 74f3952..74f3952 100644
--- a/web/images/ipernav-trans.png
+++ b/doc/images/ipernav-trans.png
Binary files differ
diff --git a/web/images/keyz-flat2.jpg b/doc/images/keyz-flat2.jpg
index e4fe562..e4fe562 100644
--- a/web/images/keyz-flat2.jpg
+++ b/doc/images/keyz-flat2.jpg
Binary files differ
diff --git a/web/images/mask-sospesa-psico.jpg b/doc/images/mask-sospesa-psico.jpg
index 115ee55..115ee55 100644
--- a/web/images/mask-sospesa-psico.jpg
+++ b/doc/images/mask-sospesa-psico.jpg
Binary files differ
diff --git a/web/images/osalliance.png b/doc/images/osalliance.png
index a4e2a7f..a4e2a7f 100644
--- a/web/images/osalliance.png
+++ b/doc/images/osalliance.png
Binary files differ
diff --git a/web/images/tutorial-screenshot.jpg b/doc/images/tutorial-screenshot.jpg
index 7853dfe..7853dfe 100644
--- a/web/images/tutorial-screenshot.jpg
+++ b/doc/images/tutorial-screenshot.jpg
Binary files differ
diff --git a/web/index.org b/doc/old-webpage.org
index 600aca6..600aca6 100644
--- a/web/index.org
+++ b/doc/old-webpage.org
diff --git a/src/Makefile.am b/src/Makefile.am
index 4f33a9b..42bebb6 100644
--- a/src/Makefile.am
+++ b/src/Makefile.am
@@ -25,7 +25,7 @@ SOURCES = \
video_layer.cpp image_layer.cpp \
text_layer.cpp generator_layer.cpp \
geo_layer.cpp flash_layer.cpp \
- xscreensaver_layer.cpp goom_layer.cpp \
+ xscreensaver_layer.cpp \
xgrab_layer.cpp opencv_cam_layer.cpp \
audio_layer.cpp cairo_layer.cpp \
\
@@ -63,7 +63,7 @@ JS_SOURCES = context_js.cpp \
geo_layer_js.cpp \
generator_layer_js.cpp \
flash_layer_js.cpp \
- goom_layer_js.cpp \
+ \
cairo_layer_js.cpp \
audio_collector_js.cpp \
kbd_ctrl_js.cpp
diff --git a/src/goom_layer.cpp b/src/obsolete/goom_layer.cpp
index ec4e5be..ec4e5be 100644
--- a/src/goom_layer.cpp
+++ b/src/obsolete/goom_layer.cpp
diff --git a/src/goom_layer_js.cpp b/src/obsolete/goom_layer_js.cpp
index e7d308f..e7d308f 100644
--- a/src/goom_layer_js.cpp
+++ b/src/obsolete/goom_layer_js.cpp
diff --git a/web/Makefile b/web/Makefile
deleted file mode 100644
index 4f6d6db..0000000
--- a/web/Makefile
+++ /dev/null
@@ -1,41 +0,0 @@
-
-EMACS = emacs
-INDEX = index.org
-
-ifndef $(SCRIPTS)
- SCRIPTS = .
-endif
-
-all: cache ascii html pdf apache.conf
-
-cache:
- mkdir -p templates_c cache
- chmod a+rwx templates_c cache
-
-index.html: index.org
- $(EMACS) -no-site-file -batch -l $(SCRIPTS)/elisp/org-batch.el \
- --visit $(INDEX) -f org-export-as-html
-
-index.txt: index.org
- $(EMACS) -no-site-file q -batch -l $(SCRIPTS)/elisp/org-batch.el \
- --visit $(INDEX) -f org-export-as-ascii
-
-index.pdf: index.org
- $(EMACS) -no-site-file -q -batch -l $(SCRIPTS)/elisp/org-batch.el \
- --visit $(INDEX) -f org-export-as-pdf
-
-ascii: index.txt
-
-html: index.html
- $(SCRIPTS)/bin/org-split-body-toc.sh index.html
-
-pdf: index.pdf
-
-apache.conf:
- ./bin/generate-apache-conf.sh
-
-clean:
- rm -f *~ *.pdf *.tex *.html *.xml *.txt *.conf
- rm -rf templates_c cache
-
-
diff --git a/web/README b/web/README
deleted file mode 100644
index f33cadb..0000000
--- a/web/README
+++ /dev/null
@@ -1,25 +0,0 @@
-
-Org-mode generated website setup for dyne.org
-
-This directory contains .org files for content
-and scripts to render the website locally for preview
-once pushed on the server the website will be visible
-
-To activate local preview make sure you have installed Emacs
-and TexLive on your distribution, then manually install the
-latest stable version of Org-mode from orgmode.org
-
-from inside orgmode, do:
-
- make
- sudo make install
- sudo cp -ra contrib/lisp/* /usr/local/share/emacs/site-lisp/
-
-this will install the latest version in /usr/local/share
-
-then run make in this directory to generate the site
-and then follow instructions to activate the apache.conf
-
-happy hacking ;^)
-
-
diff --git a/web/bin/generate-apache-conf.sh b/web/bin/generate-apache-conf.sh
deleted file mode 100755
index 8da7445..0000000
--- a/web/bin/generate-apache-conf.sh
+++ /dev/null
@@ -1,42 +0,0 @@
-#!/bin/sh
-
-# this script generates the website configuration locally
-# it requires emacs, texlive and latest stable org-mode
-# will download some scripts and prepare this directory
-# so that running make the website will be compiled
-
-mkdir -p templates_c; chmod a+w templates_c
-mkdir -p cache; chmod a+w cache
-cat > apache.conf <<EOT
-<VirtualHost *:80>
- ServerAdmin webmaster@localhost
-
- ServerName freej.local.org
- DocumentRoot `pwd`
- <Directory `pwd`/>
- Options Indexes FollowSymLinks MultiViews
- AllowOverride None
- Order allow,deny
- allow from all
- </Directory>
-
- ErrorLog /var/log/apache2/freej-error.log
-
- # Possible values include: debug, info, notice, warn, error, crit,
- # alert, emerg.
- LogLevel warn
-
- CustomLog /var/log/apache2/freej-access.log combined
-</VirtualHost>
-EOT
-echo
-echo "generation completed, link the apache.conf to enable the website"
-echo "then add freej.local.org to your /etc/hosts to reach it:"
-echo
-echo "sudo ln -s `pwd`/apache.conf /etc/apache2/sites-enabled/freej-web"
-echo "sudo sh -c 'echo \"127.0.0.1 freej.local.org\" >> /etc/hosts'"
-echo
-echo "use 'make' to generate a new version of the website which will be"
-echo "visible on http://freej.local.org"
-echo
-
diff --git a/web/bin/org-split-body-toc.sh b/web/bin/org-split-body-toc.sh
deleted file mode 100755
index 1139c11..0000000
--- a/web/bin/org-split-body-toc.sh
+++ /dev/null
@@ -1,64 +0,0 @@
-#!/bin/sh
-#
-# small shell script to collate together the web pages
-# extracts the <body> part from the org-mode rendered HTML file
-# then formats it as a template to be shown by the index.php
-#
-# March 2010 by Jaromil
-
-if [ -z $1 ]; then
- echo "usage: org-split-body-toc.sh orgmode.html"
- echo "this tool splits an orgmode in two parts: <TOC> and <body>"
- echo "it also eliminates headers and footers."
- exit 1
-fi
-
-tmpfile="/tmp/org-split-body-toc-`date +%s`"
-rm -f $tmpfile
-
-orgfile=${1}
-
-orgname=`echo $orgfile|cut -d. -f1`
-
-cat $orgfile | \
- awk '
-BEGIN { body_found=0; title_found=0; }
-/<body>/ { body_found=1; next; }
-/^<h1 class="title">/ { title_found=1; next; }
-
-{
-if(body_found==1)
- if(title_found==1)
- print $0;
-}
-
-/^<p class="creator">/ { title_found=0; }
-/^<\/body>/ { body_found=0; next; }
-' > $tmpfile
-
-# separate the TOC
-echo "<div id=\"table-of-contents\">" > ${orgname}-toc.html
-cat $tmpfile | \
- awk '
-BEGIN { toc_found=0; div_count=0; }
-/^<div id="table-of-contents">/ { toc_found=1; next; }
-{ if(div_count>1) toc_found=0;
- if(toc_found==1) print $0;
-}
-/^<\/div>/ { div_count++; }
-' >> ${orgname}-toc.html
-
-# separate the BODY
-cat $tmpfile | \
- awk '
-BEGIN { div_count=0; }
-{ if(div_count>1) print $0; }
-/^<\/div>/ { div_count++; }
-' > ${orgname}-body.html
-echo "</div>" >> ${orgname}-body.html
-
-# delete the temporary file
-rm -f $tmpfile
-
-echo "org-mode html $orgfile splitted in ${orgname}-toc.html and ${orgname}-body.html"
-
diff --git a/web/elisp/color-theme.el b/web/elisp/color-theme.el
deleted file mode 100644
index c92c1a5..0000000
--- a/web/elisp/color-theme.el
+++ /dev/null
@@ -1,1668 +0,0 @@
-;;; color-theme.el --- install color themes
-
-;; Copyright (C) 1999, 2000 Jonadab the Unsightly One <jonadab@bright.net>
-;; Copyright (C) 2000, 2001, 2002, 2003 Alex Schroeder <alex@gnu.org>
-;; Copyright (C) 2003, 2004, 2005, 2006 Xavier Maillard <zedek@gnu.org>
-
-;; Version: 6.6.0
-;; Keywords: faces
-;; Author: Jonadab the Unsightly One <jonadab@bright.net>
-;; Maintainer: Xavier Maillard <zedek@gnu.org>
-;; URL: http://www.emacswiki.org/cgi-bin/wiki.pl?ColorTheme
-
-;; This file is not (YET) part of GNU Emacs.
-
-;; This is free software; you can redistribute it and/or modify it under
-;; the terms of the GNU General Public License as published by the Free
-;; Software Foundation; either version 2, or (at your option) any later
-;; version.
-;;
-;; This is distributed in the hope that it will be useful, but WITHOUT
-;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-;; for more details.
-;;
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
-;; MA 02111-1307, USA.
-
-;;; Commentary:
-
-;; Please read README and BUGS files for any relevant help.
-;; Contributors (not themers) should also read HACKING file.
-
-;;; Thanks
-
-;; Deepak Goel <deego@glue.umd.edu>
-;; S. Pokrovsky <pok@nbsp.nsk.su> for ideas and discussion.
-;; Gordon Messmer <gordon@dragonsdawn.net> for ideas and discussion.
-;; Sriram Karra <karra@cs.utah.edu> for the color-theme-submit stuff.
-;; Olgierd `Kingsajz' Ziolko <kingsajz@rpg.pl> for the spec-filter idea.
-;; Brian Palmer for color-theme-library ideas and code
-;; All the users that contributed their color themes.
-
-
-
-;;; Code:
-(eval-when-compile
- (require 'easymenu)
- (require 'reporter)
- (require 'sendmail))
-
-(require 'cl); set-difference is a function...
-
-;; for custom-face-attributes-get or face-custom-attributes-get
-(require 'cus-face)
-(require 'wid-edit); for widget-apply stuff in cus-face.el
-
-(defconst color-theme-maintainer-address "zedek@gnu.org"
- "Address used by `submit-color-theme'.")
-
-;; Emacs / XEmacs compatibility and workaround layer
-
-(cond ((and (facep 'tool-bar)
- (not (facep 'toolbar)))
- (put 'toolbar 'face-alias 'tool-bar))
- ((and (facep 'toolbar)
- (not (facep 'tool-bar)))
- (put 'tool-bar 'face-alias 'toolbar)))
-
-(defvar color-theme-xemacs-p (and (featurep 'xemacs)
- (string-match "XEmacs" emacs-version))
- "Non-nil if running XEmacs.")
-
-;; Add this since it appears to miss in emacs-2x
-(or (fboundp 'replace-in-string)
- (defun replace-in-string (target old new)
- (replace-regexp-in-string old new target)))
-
-;; face-attr-construct has a problem in Emacs 20.7 and older when
-;; dealing with inverse-video faces. Here is a short test to check
-;; wether you are affected.
-
-;; (set-background-color "wheat")
-;; (set-foreground-color "black")
-;; (setq a (make-face 'a-face))
-;; (face-spec-set a '((t (:background "white" :foreground "black" :inverse-video t))))
-;; (face-attr-construct a)
-;; => (:background "black" :inverse-video t)
-
-;; The expected response is the original specification:
-;; => (:background "white" :foreground "black" :inverse-video t)
-
-;; That's why we depend on cus-face.el functionality.
-
-(cond ((fboundp 'custom-face-attributes-get)
- (defun color-theme-face-attr-construct (face frame)
- (if (atom face)
- (custom-face-attributes-get face frame)
- (if (and (consp face) (eq (car face) 'quote))
- (custom-face-attributes-get (cadr face) frame)
- (custom-face-attributes-get (car face) frame)))))
- ((fboundp 'face-custom-attributes-get)
- (defalias 'color-theme-face-attr-construct
- 'face-custom-attributes-get))
- (t
- (defun color-theme-face-attr-construct (&rest ignore)
- (error "Unable to construct face attributes"))))
-
-(defun color-theme-alist (plist)
- "Transform PLIST into an alist if it is a plist and return it.
-If the first element of PLIST is a cons cell, we just return PLIST,
-assuming PLIST to be an alist. If the first element of plist is not a
-symbol, this is an error: We cannot distinguish a plist from an ordinary
-list, but a list that doesn't start with a symbol is certainly no plist
-and no alist.
-
-This is used to make sure `default-frame-alist' really is an alist and not
-a plist. In XEmacs, the alist is deprecated; a plist is used instead."
- (cond ((consp (car plist))
- plist)
- ((not (symbolp (car plist)))
- (error "Wrong type argument: plist, %S" plist))
- ((featurep 'xemacs)
- (plist-to-alist plist)))); XEmacs only
-
-;; Customization
-
-(defgroup color-theme nil
- "Color Themes for Emacs.
-A color theme consists of frame parameter settings, variable settings,
-and face definitions."
- :version "20.6"
- :group 'faces)
-
-(defcustom color-theme-legal-frame-parameters "\\(color\\|mode\\)$"
- "Regexp that matches frame parameter names.
-Only frame parameter names that match this regexp can be changed as part
-of a color theme."
- :type '(choice (const :tag "Colors only" "\\(color\\|mode\\)$")
- (const :tag "Colors, fonts, and size"
- "\\(color\\|mode\\|font\\|height\\|width\\)$")
- (regexp :tag "Custom regexp"))
- :group 'color-theme
- :link '(info-link "(elisp)Window Frame Parameters"))
-
-(defcustom color-theme-legal-variables "\\(color\\|face\\)$"
- "Regexp that matches variable names.
-Only variables that match this regexp can be changed as part of a color
-theme. In addition to matching this name, the variables have to be user
-variables (see function `user-variable-p')."
- :type 'regexp
- :group 'color-theme)
-
-(defcustom color-theme-illegal-faces "^w3-"
- "Regexp that matches face names forbidden in themes.
-The default setting \"^w3-\" excludes w3 faces since these
-are created dynamically."
- :type 'regexp
- :group 'color-theme
- :link '(info-link "(elisp)Faces for Font Lock")
- :link '(info-link "(elisp)Standard Faces"))
-
-(defcustom color-theme-illegal-default-attributes '(:family :height :width)
- "A list of face properties to be ignored when installing faces.
-This prevents Emacs from doing terrible things to your display just because
-a theme author likes weird fonts."
- :type '(repeat symbol)
- :group 'color-theme)
-
-(defcustom color-theme-is-global t
- "*Determines wether a color theme is installed on all frames or not.
-If non-nil, color themes will be installed for all frames.
-If nil, color themes will be installed for the selected frame only.
-
-A possible use for this variable is dynamic binding. Here is a larger
-example to put in your ~/.emacs; it will make the Blue Sea color theme
-the default used for the first frame, and it will create two additional
-frames with different color themes.
-
-setup:
- \(require 'color-theme)
- ;; set default color theme
- \(color-theme-blue-sea)
- ;; create some frames with different color themes
- \(let ((color-theme-is-global nil))
- \(select-frame (make-frame))
- \(color-theme-gnome2)
- \(select-frame (make-frame))
- \(color-theme-standard))
-
-Please note that using XEmacs and and a nil value for
-color-theme-is-global will ignore any variable settings for the color
-theme, since XEmacs doesn't have frame-local variable bindings.
-
-Also note that using Emacs and a non-nil value for color-theme-is-global
-will install a new color theme for all frames. Using XEmacs and a
-non-nil value for color-theme-is-global will install a new color theme
-only on those frames that are not using a local color theme."
- :type 'boolean
- :group 'color-theme)
-
-(defcustom color-theme-is-cumulative t
- "*Determines wether new color themes are installed on top of each other.
-If non-nil, installing a color theme will undo all settings made by
-previous color themes."
- :type 'boolean
- :group 'color-theme)
-
-(defcustom color-theme-directory nil
- "Directory where we can find additionnal themes (personnal).
-Note that there is at least one directory shipped with the official
-color-theme distribution where all contributed themes are located.
-This official selection can't be changed with that variable.
-However, you still can decide to turn it on or off and thus,
-not be shown with all themes but yours."
- :type '(repeat string)
- :group 'color-theme)
-
-(defcustom color-theme-libraries (directory-files
- (concat
- (file-name-directory (locate-library "color-theme"))
- "/themes") t "^color-theme")
- "A list of files, which will be loaded in color-theme-initialize depending
-on `color-theme-load-all-themes' value.
-This allows a user to prune the default color-themes (which can take a while
-to load)."
- :type '(repeat string)
- :group 'color-theme)
-
-(defcustom color-theme-load-all-themes t
- "When t, load all color-theme theme files
-as presented by `color-theme-libraries'. Else
-do not load any of this themes."
- :type 'boolean
- :group 'color-theme)
-
-(defcustom color-theme-mode-hook nil
- "Hook for color-theme-mode."
- :type 'hook
- :group 'color-theme)
-
-(defvar color-theme-mode-map
- (let ((map (make-sparse-keymap)))
- (define-key map (kbd "RET") 'color-theme-install-at-point)
- (define-key map (kbd "c") 'list-colors-display)
- (define-key map (kbd "d") 'color-theme-describe)
- (define-key map (kbd "f") 'list-faces-display)
- (define-key map (kbd "i") 'color-theme-install-at-point)
- (define-key map (kbd "l") 'color-theme-install-at-point-for-current-frame)
- (define-key map (kbd "p") 'color-theme-print)
- (define-key map (kbd "q") 'bury-buffer)
- (define-key map (kbd "?") 'color-theme-describe)
- (if color-theme-xemacs-p
- (define-key map (kbd "<button2>") 'color-theme-install-at-mouse)
- (define-key map (kbd "<mouse-2>") 'color-theme-install-at-mouse))
- map)
- "Mode map used for the buffer created by `color-theme-select'.")
-
-(defvar color-theme-initialized nil
- "Internal variable determining whether color-theme-initialize has been invoked yet")
-
-(defvar color-theme-buffer-name "*Color Theme Selection*"
- "Name of the color theme selection buffer.")
-
-(defvar color-theme-original-frame-alist nil
- "nil until one of the color themes has been installed.")
-
-(defvar color-theme-history nil
- "List of color-themes called, in reverse order")
-
-(defcustom color-theme-history-max-length nil
- "Max length of history to maintain.
-Two other values are acceptable: t means no limit, and
-nil means that no history is maintained."
- :type '(choice (const :tag "No history" nil)
- (const :tag "Unlimited length" t)
- integer)
- :group 'color-theme)
-
-(defvar color-theme-counter 0
- "Counter for every addition to `color-theme-history'.
-This counts how many themes were installed, regardless
-of `color-theme-history-max-length'.")
-
-(defvar color-theme-entry-path (cond
- ;; Emacs 22.x and later
- ((lookup-key global-map [menu-bar tools])
- '("tools"))
- ;; XEmacs
- ((featurep 'xemacs)
- (setq tool-entry '("Tools")))
- ;; Emacs < 22
- (t
- '("Tools")))
- "Menu tool entry path.")
-
-(defun color-theme-add-to-history (name)
- "Add color-theme NAME to `color-theme-history'."
- (setq color-theme-history
- (cons (list name color-theme-is-cumulative)
- color-theme-history)
- color-theme-counter (+ 1 color-theme-counter))
- ;; Truncate the list if necessary.
- (when (and (integerp color-theme-history-max-length)
- (>= (length color-theme-history)
- color-theme-history-max-length))
- (setcdr (nthcdr (1- color-theme-history-max-length)
- color-theme-history)
- nil)))
-
-;; (let ((l '(1 2 3 4 5)))
-;; (setcdr (nthcdr 2 l) nil)
-;; l)
-
-
-
-;; List of color themes used to create the *Color Theme Selection*
-;; buffer.
-
-(defvar color-themes
- '((color-theme-aalto-dark "Aalto Dark" "Jari Aalto <jari.aalto@poboxes.com>")
- (color-theme-aalto-light "Aalto Light" "Jari Aalto <jari.aalto@poboxes.com>")
- (color-theme-aliceblue "Alice Blue" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-andreas "Andreas" "Andreas Busch <Andreas.Busch@politics.ox.ac.uk>")
- (color-theme-arjen "Arjen" "Arjen Wiersma <arjen@wiersma.org>")
- (color-theme-beige-diff "Beige Diff" "Alex Schroeder <alex@gnu.org>" t)
- (color-theme-bharadwaj "Bharadwaj" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-bharadwaj-slate "Bharadwaj Slate" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-billw "Billw" "Bill White <billw@wolfram.com>")
- (color-theme-black-on-gray "BlackOnGray" "Sudhir Bhojwani <sbhojwani@altoweb.com>")
- (color-theme-blippblopp "Blipp Blopp" "Thomas Sicheritz-Ponten<thomas@biopython.org>")
- (color-theme-simple-1 "Black" "Jonadab <jonadab@bright.net>")
- (color-theme-blue-erc "Blue ERC" "Alex Schroeder <alex@gnu.org>" t)
- (color-theme-blue-gnus "Blue Gnus" "Alex Schroeder <alex@gnu.org>" t)
- (color-theme-blue-mood "Blue Mood" "Nelson Loyola <nloyola@yahoo.com>")
- (color-theme-blue-sea "Blue Sea" "Alex Schroeder <alex@gnu.org>")
- (color-theme-calm-forest "Calm Forest" "Artur Hefczyc <kobit@plusnet.pl>")
- (color-theme-charcoal-black "Charcoal Black" "Lars Chr. Hausmann <jazz@zqz.dk>")
- (color-theme-goldenrod "Cheap Goldenrod" "Alex Schroeder <alex@gnu.org>")
- (color-theme-clarity "Clarity and Beauty" "Richard Wellum <rwellum@cisco.com>")
- (color-theme-classic "Classic" "Frederic Giroud <postcard@worldonline.fr>")
- (color-theme-comidia "Comidia" "Marcelo Dias de Toledo <mtole@ig.com.br>")
- (color-theme-jsc-dark "Cooper Dark" "John S Cooper <John.Cooper@eu.citrix.com>")
- (color-theme-jsc-light "Cooper Light" "John S Cooper <John.Cooper@eu.citrix.com>")
- (color-theme-jsc-light2 "Cooper Light 2" "John S Cooper <John.Cooper@eu.citrix.com>")
- (color-theme-dark-blue "Dark Blue" "Chris McMahan <cmcmahan@one.net>")
- (color-theme-dark-blue2 "Dark Blue 2" "Chris McMahan <cmcmahan@one.net>")
- (color-theme-dark-green "Dark Green" "eddy_woody@hotmail.com")
- (color-theme-dark-laptop "Dark Laptop" "Laurent Michel <ldm@cs.brown.edu>")
- (color-theme-deep-blue "Deep Blue" "Tomas Cerha <cerha@brailcom.org>")
- (color-theme-digital-ofs1 "Digital OFS1" "Gareth Owen <gowen@gwowen.freeserve.co.uk>")
- (color-theme-euphoria "Euphoria" "oGLOWo@oGLOWo.cjb.net")
- (color-theme-feng-shui "Feng Shui" "Walter Higgins <walterh@rocketmail.com>")
- (color-theme-fischmeister "Fischmeister"
- "Sebastian Fischmeister <sfischme@nexus.lzk.tuwien.ac.at>")
- (color-theme-gnome "Gnome" "Jonadab <jonadab@bright.net>")
- (color-theme-gnome2 "Gnome 2" "Alex Schroeder <alex@gnu.org>")
- (color-theme-gray1 "Gray1" "Paul Pulli <P.Pulli@motorola.com>")
- (color-theme-gray30 "Gray30" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-kingsajz "Green Kingsajz" "Olgierd `Kingsajz' Ziolko <kingsajz@rpg.pl>")
- (color-theme-greiner "Greiner" "Kevin Greiner <kgreiner@mapquest.com>")
- (color-theme-gtk-ide "GTK IDE" "Gordon Messmer <gordon@dragonsdawn.net>")
- (color-theme-high-contrast "High Contrast" "Alex Schroeder <alex@gnu.org>")
- (color-theme-hober "Hober" "Edward O'Connor <ted@oconnor.cx>")
- (color-theme-infodoc "Infodoc" "Frederic Giroud <postcard@worldonline.fr>")
- (color-theme-jb-simple "JB Simple" "jeff@dvns.com")
- (color-theme-jedit-grey "Jedit Grey" "Gordon Messmer <gordon@dragonsdawn.net>")
- (color-theme-jonadabian "Jonadab" "Jonadab <jonadab@bright.net>")
- (color-theme-jonadabian-slate "Jonadabian Slate" "Jonadab <jonadab@bright.net>")
- (color-theme-katester "Katester" "Higgins_Walter@emc.com")
- (color-theme-late-night "Late Night" "Alex Schroeder <alex@gnu.org>")
- (color-theme-lawrence "Lawrence" "lawrence mitchell <wence@gmx.li>")
- (color-theme-lethe "Lethe" "Ivica Loncar <ivica.loncar@srk.fer.hr>")
- (color-theme-ld-dark "Linh Dang Dark" "Linh Dang <linhd@nortelnetworks.com>")
- (color-theme-marine "Marine" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-matrix "Matrix" "Walter Higgins <walterh@rocketmail.com>")
- (color-theme-marquardt "Marquardt" "Colin Marquardt <colin@marquardt-home.de>")
- (color-theme-midnight "Midnight" "Gordon Messmer <gordon@dragonsdawn.net>")
- (color-theme-mistyday "Misty Day" "Hari Kumar <Hari.Kumar@mtm.kuleuven.ac.be>")
- (color-theme-montz "Montz" "Brady Montz <bradym@becomm.com>")
- (color-theme-oswald "Oswald" "Tom Oswald <toswald@sharplabs.com>")
- (color-theme-parus "Parus" "Jon K Hellan <hellan@acm.org>")
- (color-theme-pierson "Pierson" "Dan L. Pierson <dan@sol.control.com>")
- (color-theme-ramangalahy "Ramangalahy" "Solofo Ramangalahy <solofo@irisa.fr>")
- (color-theme-raspopovic "Raspopovic" "Pedja Raspopovic <pedja@lsil.com>")
- (color-theme-renegade "Renegade" "Dave Benjamin <ramen@ramenfest.com>")
- (color-theme-resolve "Resolve" "Damien Elmes <resolve@repose.cx>")
- (color-theme-retro-green "Retro Green" "Alex Schroeder <alex@gnu.org>")
- (color-theme-retro-orange "Retro Orange" "Alex Schroeder <alex@gnu.org>")
- (color-theme-robin-hood "Robin Hood" "Alex Schroeder <alex@gnu.org>")
- (color-theme-rotor "Rotor" "Jinwei Shen <shenjw@wam.umd.edu>")
- (color-theme-ryerson "Ryerson" "Luis Fernandes <elf@ee.ryerson.ca>")
- (color-theme-salmon-diff "Salmon Diff" "Alex Schroeder <alex@gnu.org>" t)
- (color-theme-salmon-font-lock "Salmon Font-Lock" "Alex Schroeder <alex@gnu.org>" t)
- (color-theme-scintilla "Scintilla" "Gordon Messmer <gordon@dragonsdawn.net>")
- (color-theme-shaman "Shaman" "shaman@interdon.net")
- (color-theme-sitaramv-nt "Sitaram NT"
- "Sitaram Venkatraman <sitaramv@loc251.tandem.com>")
- (color-theme-sitaramv-solaris "Sitaram Solaris"
- "Sitaram Venkatraman <sitaramv@loc251.tandem.com>")
- (color-theme-snow "Snow" "Nicolas Rist <Nicolas.Rist@alcatel.de>")
- (color-theme-snowish "Snowish" "Girish Bharadwaj <girishb@gbvsoft.com>")
- (color-theme-standard-ediff "Standard Ediff" "Emacs Team, added by Alex Schroeder <alex@gnu.org>" t)
- (color-theme-standard "Standard Emacs 20" "Emacs Team, added by Alex Schroeder <alex@gnu.org>")
- (color-theme-emacs-21 "Standard Emacs 21" "Emacs Team, added by Alex Schroeder <alex@gnu.org>")
- (color-theme-emacs-nw "Standard Emacs 21 No Window" "Emacs Team, added by D. Goel <deego@gnufans.org>")
- (color-theme-xemacs "Standard XEmacs" "XEmacs Team, added by Alex Schroeder <alex@gnu.org>")
- (color-theme-subtle-blue "Subtle Blue" "Chris McMahan <cmcmahan@one.net>")
- (color-theme-subtle-hacker "Subtle Hacker" "Colin Walters <levanti@verbum.org>")
- (color-theme-taming-mr-arneson "Taming Mr Arneson" "Erik Arneson <erik@aarg.net>")
- (color-theme-taylor "Taylor" "Art Taylor <reeses@hemisphere.org>")
- (color-theme-tty-dark "TTY Dark" "O Polite <m2@plusseven.com>")
- (color-theme-vim-colors "Vim Colors" "Michael Soulier <msoulier@biryani.nssg.mitel.com>")
- (color-theme-whateveryouwant "Whateveryouwant" "Fabien Penso <penso@linuxfr.org>, color by Scott Jaderholm <scott@jaderholm.com>")
- (color-theme-wheat "Wheat" "Alex Schroeder <alex@gnu.org>")
- (color-theme-pok-wob "White On Black" "S. Pokrovsky <pok@nbsp.nsk.su>")
- (color-theme-pok-wog "White On Grey" "S. Pokrovsky <pok@nbsp.nsk.su>")
- (color-theme-word-perfect "WordPerfect" "Thomas Gehrlein <Thomas.Gehrlein@t-online.de>")
- (color-theme-xp "XP" "Girish Bharadwaj <girishb@gbvsoft.com>"))
- "List of color themes.
-
-Each THEME is itself a three element list (FUNC NAME MAINTAINER &optional LIBRARY).
-
-FUNC is a color theme function which does the setup. The function
-FUNC may call `color-theme-install'. The color theme function may be
-interactive.
-
-NAME is the name of the theme and MAINTAINER is the name and/or email of
-the maintainer of the theme.
-
-If LIBRARY is non-nil, the color theme will be considered a library and
-may not be shown in the default menu.
-
-If you defined your own color theme and want to add it to this list,
-use something like this:
-
- (add-to-list 'color-themes '(color-theme-gnome2 \"Gnome2\" \"Alex\"))")
-
-;;; Functions
-
-(defun color-theme-backup-original-values ()
- "Back up the original `default-frame-alist'.
-The values are stored in `color-theme-original-frame-alist' on
-startup."
- (if (null color-theme-original-frame-alist)
- (setq color-theme-original-frame-alist
- (color-theme-filter (frame-parameters (selected-frame))
- color-theme-legal-frame-parameters))))
-(add-hook 'after-init-hook 'color-theme-backup-original-values)
-
-;;;###autoload
-(defun color-theme-select (&optional arg)
- "Displays a special buffer for selecting and installing a color theme.
-With optional prefix ARG, this buffer will include color theme libraries
-as well. A color theme library is in itself not complete, it must be
-used as part of another color theme to be useful. Thus, color theme
-libraries are mainly useful for color theme authors."
- (interactive "P")
- (unless color-theme-initialized (color-theme-initialize))
- (switch-to-buffer (get-buffer-create color-theme-buffer-name))
- (setq buffer-read-only nil)
- (erase-buffer)
- ;; recreate the snapshot if necessary
- (when (or (not (assq 'color-theme-snapshot color-themes))
- (not (commandp 'color-theme-snapshot)))
- (fset 'color-theme-snapshot (color-theme-make-snapshot))
- (setq color-themes (delq (assq 'color-theme-snapshot color-themes)
- color-themes)
- color-themes (delq (assq 'bury-buffer color-themes)
- color-themes)
- color-themes (append '((color-theme-snapshot
- "[Reset]" "Undo changes, if possible.")
- (bury-buffer
- "[Quit]" "Bury this buffer."))
- color-themes)))
- (dolist (theme color-themes)
- (let ((func (nth 0 theme))
- (name (nth 1 theme))
- (author (nth 2 theme))
- (library (nth 3 theme))
- (desc))
- (when (or (not library) arg)
- (setq desc (format "%-23s %s"
- (if library (concat name " [lib]") name)
- author))
- (put-text-property 0 (length desc) 'color-theme func desc)
- (put-text-property 0 (length name) 'face 'bold desc)
- (put-text-property 0 (length name) 'mouse-face 'highlight desc)
- (insert desc)
- (newline))))
- (goto-char (point-min))
- (setq buffer-read-only t)
- (set-buffer-modified-p nil)
- (color-theme-mode))
-
-(when (require 'easymenu)
- (easy-menu-add-item nil color-theme-entry-path "--")
- (easy-menu-add-item nil color-theme-entry-path
- ["Color Themes" color-theme-select t]))
-
-(defun color-theme-mode ()
- "Major mode to select and install color themes.
-
-Use \\[color-theme-install-at-point] to install a color theme on all frames.
-Use \\[color-theme-install-at-point-for-current-frame] to install a color theme for the current frame only.
-
-The changes are applied on top of your current setup. This is a
-feature.
-
-Some of the themes should be considered extensions to the standard color
-theme: they modify only a limited number of faces and variables. To
-verify the final look of a color theme, install the standard color
-theme, then install the other color theme. This is a feature. It allows
-you to mix several color themes.
-
-Use \\[color-theme-describe] to read more about the color theme function at point.
-If you want to install the color theme permanently, put the call to the
-color theme function into your ~/.emacs:
-
- \(require 'color-theme)
- \(color-theme-gnome2)
-
-If you worry about the size of color-theme.el: You are right. Use
-\\[color-theme-print] to print the current color theme and save the resulting buffer
-as ~/.emacs-color-theme. Now you can install only this specific color
-theme in your .emacs:
-
- \(load-file \"~/.emacs-color-theme\")
- \(my-color-theme)
-
-The Emacs menu is not affected by color themes within Emacs. Depending
-on the toolkit you used to compile Emacs, you might have to set specific
-X ressources. See the info manual for more information. Here is an
-example ~/.Xdefaults fragment:
-
- emacs*Background: DarkSlateGray
- emacs*Foreground: wheat
-
-\\{color-theme-mode-map}
-
-The color themes are listed in `color-themes', which see."
- (kill-all-local-variables)
- (setq major-mode 'color-theme-mode)
- (setq mode-name "Color Themes")
- (use-local-map color-theme-mode-map)
- (when (functionp 'goto-address); Emacs
- (goto-address))
- (run-hooks 'color-theme-mode-hook))
-
-;;; Commands in Color Theme Selection mode
-
-;;;###autoload
-(defun color-theme-describe ()
- "Describe color theme listed at point.
-This shows the documentation of the value of text-property color-theme
-at point. The text-property color-theme should be a color theme
-function. See `color-themes'."
- (interactive)
- (describe-function (get-text-property (point) 'color-theme)))
-
-;;;###autoload
-(defun color-theme-install-at-mouse (event)
- "Install color theme clicked upon using the mouse.
-First argument EVENT is used to set point. Then
-`color-theme-install-at-point' is called."
- (interactive "e")
- (save-excursion
- (mouse-set-point event)
- (color-theme-install-at-point)))
-
-;;;autoload
-(defun color-theme-install-at-point ()
- "Install color theme at point.
-This calls the value of the text-property `color-theme' at point.
-The text-property `color-theme' should be a color theme function.
-See `color-themes'."
- (interactive)
- (let ((func (get-text-property (point) 'color-theme)))
- ;; install theme
- (if func
- (funcall func))
- ;; If goto-address is being used, remove all overlays in the current
- ;; buffer and run it again. The face used for the mail addresses in
- ;; the the color theme selection buffer is based on the variable
- ;; goto-address-mail-face. Changes in that variable will not affect
- ;; existing overlays, however, thereby confusing users.
- (when (functionp 'goto-address); Emacs
- (dolist (o (overlays-in (point-min) (point-max)))
- (delete-overlay o))
- (goto-address))))
-
-;;;###autoload
-(defun color-theme-install-at-point-for-current-frame ()
- "Install color theme at point for current frame only.
-Binds `color-theme-is-global' to nil and calls
-`color-theme-install-at-point'."
- (interactive)
- (let ((color-theme-is-global nil))
- (color-theme-install-at-point)))
-
-
-
-;; Taking a snapshot of the current color theme and pretty printing it.
-
-(defun color-theme-filter (old-list regexp &optional exclude)
- "Filter OLD-LIST.
-The resulting list will be newly allocated and contains only elements
-with names matching REGEXP. OLD-LIST may be a list or an alist. If you
-want to filter a plist, use `color-theme-alist' to convert your plist to
-an alist, first.
-
-If the optional argument EXCLUDE is non-nil, then the sense is
-reversed: only non-matching elements will be retained."
- (let (elem new-list)
- (dolist (elem old-list)
- (setq name (symbol-name (if (listp elem) (car elem) elem)))
- (when (or (and (not exclude)
- (string-match regexp name))
- (and exclude
- (not (string-match regexp name))))
- ;; Now make sure that if elem is a cons cell, and the cdr of
- ;; that cons cell is a string, then we need a *new* string in
- ;; the new list. Having a new cons cell is of no use because
- ;; modify-frame-parameters will modify this string, thus
- ;; modifying our color theme functions!
- (when (and (consp elem)
- (stringp (cdr elem)))
- (setq elem (cons (car elem)
- (copy-sequence (cdr elem)))))
- ;; Now store elem
- (setq new-list (cons elem new-list))))
- new-list))
-
-(defun color-theme-spec-filter (spec)
- "Filter the attributes in SPEC.
-This makes sure that SPEC has the form ((t (PLIST ...))).
-Only properties not in `color-theme-illegal-default-attributes'
-are included in the SPEC returned."
- (let ((props (cadar spec))
- result prop val)
- (while props
- (setq prop (nth 0 props)
- val (nth 1 props)
- props (nthcdr 2 props))
- (unless (memq prop color-theme-illegal-default-attributes)
- (setq result (cons val (cons prop result)))))
- `((t ,(nreverse result)))))
-
-;; (color-theme-spec-filter '((t (:background "blue3"))))
-;; (color-theme-spec-filter '((t (:stipple nil :background "Black" :foreground "SteelBlue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width semi-condensed :family "misc-fixed"))))
-
-(defun color-theme-plist-delete (plist prop)
- "Delete property PROP from property list PLIST by side effect.
-This modifies PLIST."
- ;; deal with prop at the start
- (while (eq (car plist) prop)
- (setq plist (cddr plist)))
- ;; deal with empty plist
- (when plist
- (let ((lastcell (cdr plist))
- (l (cddr plist)))
- (while l
- (if (eq (car l) prop)
- (progn
- (setq l (cddr l))
- (setcdr lastcell l))
- (setq lastcell (cdr l)
- l (cddr l))))))
- plist)
-
-;; (color-theme-plist-delete '(a b c d e f g h) 'a)
-;; (color-theme-plist-delete '(a b c d e f g h) 'b)
-;; (color-theme-plist-delete '(a b c d e f g h) 'c)
-;; (color-theme-plist-delete '(a b c d e f g h) 'g)
-;; (color-theme-plist-delete '(a b c d c d e f g h) 'c)
-;; (color-theme-plist-delete '(a b c d e f c d g h) 'c)
-
-(if (or (featurep 'xemacs)
- (< emacs-major-version 21))
- (defalias 'color-theme-spec-compat 'identity)
- (defun color-theme-spec-compat (spec)
- "Filter the attributes in SPEC such that is is never invalid.
-Example: Eventhough :bold works in Emacs, it is not recognized by
-`customize-face' -- and then the face is uncustomizable. This
-function replaces a :bold attribute with the corresponding :weight
-attribute, if there is no :weight, or deletes it. This undoes the
-doings of `color-theme-spec-canonical-font', more or less."
- (let ((props (cadar spec)))
- (when (plist-member props :bold)
- (setq props (color-theme-plist-delete props :bold))
- (unless (plist-member props :weight)
- (setq props (plist-put props :weight 'bold))))
- (when (plist-member props :italic)
- (setq props (color-theme-plist-delete props :italic))
- (unless (plist-member props :slant)
- (setq props (plist-put props :slant 'italic))))
- `((t ,props)))))
-
-;; (color-theme-spec-compat '((t (:foreground "blue" :bold t))))
-;; (color-theme-spec-compat '((t (:bold t :foreground "blue" :weight extra-bold))))
-;; (color-theme-spec-compat '((t (:italic t :foreground "blue"))))
-;; (color-theme-spec-compat '((t (:slant oblique :italic t :foreground "blue"))))
-
-(defun color-theme-spec-canonical-font (atts)
- "Add :bold and :italic attributes if necessary."
- ;; add these to the front of atts -- this will keept the old value for
- ;; customize-face in Emacs 21.
- (when (and (memq (plist-get atts :weight)
- '(ultra-bold extra-bold bold semi-bold))
- (not (plist-get atts :bold)))
- (setq atts (cons :bold (cons t atts))))
- (when (and (not (memq (plist-get atts :slant)
- '(normal nil)))
- (not (plist-get atts :italic)))
- (setq atts (cons :italic (cons t atts))))
- atts)
-;; (color-theme-spec-canonical-font (color-theme-face-attr-construct 'bold (selected-frame)))
-;; (defface foo '((t (:weight extra-bold))) "foo")
-;; (color-theme-spec-canonical-font (color-theme-face-attr-construct 'foo (selected-frame)))
-;; (face-spec-set 'foo '((t (:weight extra-bold))) nil)
-;; (face-spec-set 'foo '((t (:bold t))) nil)
-;; (face-spec-set 'foo '((t (:bold t :weight extra-bold))) nil)
-
-;; Handle :height according to NEWS file for Emacs 21
-(defun color-theme-spec-resolve-height (old new)
- "Return the new height given OLD and NEW height.
-OLD is the current setting, NEW is the setting inherited from."
- (cond ((not old)
- new)
- ((integerp old)
- old)
- ((and (floatp old)
- (integerp new))
- (round (* old new)))
- ((and (floatp old)
- (floatp new))
- (* old new))
- ((and (functionp old)
- (integerp new))
- (round (funcall old new)))
- ((and (functionp old)
- (float new))
- `(lambda (f) (* (funcall ,old f) ,new)))
- ((and (functionp old)
- (functionp new))
- `(lambda (f) (* (funcall ,old (funcall ,new f)))))
- (t
- (error "Illegal :height attributes: %S or %S" old new))))
-;; (color-theme-spec-resolve-height 12 1.2)
-;; (color-theme-spec-resolve-height 1.2 1.2)
-;; (color-theme-spec-resolve-height 1.2 12)
-;; (color-theme-spec-resolve-height 1.2 'foo)
-;; (color-theme-spec-resolve-height (lambda (f) (* 2 f)) 5)
-;; (color-theme-spec-resolve-height (lambda (f) (* 2 f)) 2.0)
-;; the following lambda is the result from the above calculation
-;; (color-theme-spec-resolve-height (lambda (f) (* (funcall (lambda (f) (* 2 f)) f) 2.0)) 5)
-
-(defun color-theme-spec-resolve-inheritance (atts)
- "Resolve all occurences of the :inherit attribute."
- (let ((face (plist-get atts :inherit)))
- ;; From the Emacs 21 NEWS file: "Attributes from inherited faces are
- ;; merged into the face like an underlying face would be." --
- ;; therefore properties of the inherited face only add missing
- ;; attributes.
- (when face
- ;; remove :inherit face from atts -- this assumes only one
- ;; :inherit attribute.
- (setq atts (delq ':inherit (delq face atts)))
- (let ((more-atts (color-theme-spec-resolve-inheritance
- (color-theme-face-attr-construct
- face (selected-frame))))
- att val)
- (while more-atts
- (setq att (car more-atts)
- val (cadr more-atts)
- more-atts (cddr more-atts))
- ;; Color-theme assumes that no value is ever 'unspecified.
- (cond ((eq att ':height); cumulative effect!
- (setq atts (plist-put atts
- ':height
- (color-theme-spec-resolve-height
- (plist-get atts att)
- val))))
- ;; Default: Only put if it has not been specified before.
- ((not (plist-get atts att))
- (setq atts (cons att (cons val atts))))
-
-))))
- atts))
-;; (color-theme-spec-resolve-inheritance '(:bold t))
-;; (color-theme-spec-resolve-inheritance '(:bold t :foreground "blue"))
-;; (color-theme-face-attr-construct 'font-lock-comment-face (selected-frame))
-;; (color-theme-spec-resolve-inheritance '(:bold t :inherit font-lock-comment-face))
-;; (color-theme-spec-resolve-inheritance '(:bold t :foreground "red" :inherit font-lock-comment-face))
-;; (color-theme-face-attr-construct 'Info-title-2-face (selected-frame))
-;; (color-theme-face-attr-construct 'Info-title-3-face (selected-frame))
-;; (color-theme-face-attr-construct 'Info-title-4-face (selected-frame))
-;; (color-theme-spec-resolve-inheritance '(:inherit Info-title-2-face))
-
-;; The :inverse-video attribute causes Emacs to swap foreground and
-;; background colors, XEmacs does not. Therefore, if anybody chooses
-;; the inverse-video attribute, we 1. swap the colors ourselves in Emacs
-;; and 2. we remove the inverse-video attribute in Emacs and XEmacs.
-;; Inverse-video is only useful on a monochrome tty.
-(defun color-theme-spec-maybe-invert (atts)
- "Remove the :inverse-video attribute from ATTS.
-If ATTS contains :inverse-video t, remove it and swap foreground and
-background color. Return ATTS."
- (let ((inv (plist-get atts ':inverse-video)))
- (if inv
- (let (result att)
- (while atts
- (setq att (car atts)
- atts (cdr atts))
- (cond ((and (eq att :foreground) (not color-theme-xemacs-p))
- (setq result (cons :background result)))
- ((and (eq att :background) (not color-theme-xemacs-p))
- (setq result (cons :foreground result)))
- ((eq att :inverse-video)
- (setq atts (cdr atts))); this prevents using dolist
- (t
- (setq result (cons att result)))))
- (nreverse result))
- ;; else
- atts)))
-;; (color-theme-spec-maybe-invert '(:bold t))
-;; (color-theme-spec-maybe-invert '(:foreground "blue"))
-;; (color-theme-spec-maybe-invert '(:background "red"))
-;; (color-theme-spec-maybe-invert '(:inverse-video t))
-;; (color-theme-spec-maybe-invert '(:inverse-video t :foreground "red"))
-;; (color-theme-spec-maybe-invert '(:inverse-video t :background "red"))
-;; (color-theme-spec-maybe-invert '(:inverse-video t :background "red" :foreground "blue" :bold t))
-;; (color-theme-spec-maybe-invert '(:inverse-video nil :background "red" :foreground "blue" :bold t))
-
-(defun color-theme-spec (face)
- "Return a list for FACE which has the form (FACE SPEC).
-See `defface' for the format of SPEC. In this case we use only one
-DISPLAY, t, and determine ATTS using `color-theme-face-attr-construct'.
-If ATTS is nil, (nil) is used instead.
-
-If ATTS contains :inverse-video t, we remove it and swap foreground and
-background color using `color-theme-spec-maybe-invert'. We do this
-because :inverse-video is handled differently in Emacs and XEmacs. We
-will loose on a tty without colors, because in that situation,
-:inverse-video means something."
- (let ((atts
- (color-theme-spec-canonical-font
- (color-theme-spec-maybe-invert
- (color-theme-spec-resolve-inheritance
- (color-theme-face-attr-construct face (selected-frame)))))))
- (if atts
- `(,face ((t ,atts)))
- `(,face ((t (nil)))))))
-
-(defun color-theme-get-params ()
- "Return a list of frame parameter settings usable in a color theme.
-Such an alist may be installed by `color-theme-install-frame-params'. The
-frame parameters returned must match `color-theme-legal-frame-parameters'."
- (let ((params (color-theme-filter (frame-parameters (selected-frame))
- color-theme-legal-frame-parameters)))
- (sort params (lambda (a b) (string< (symbol-name (car a))
- (symbol-name (car b)))))))
-
-(defun color-theme-get-vars ()
- "Return a list of variable settings usable in a color theme.
-Such an alist may be installed by `color-theme-install-variables'.
-The variable names must match `color-theme-legal-variables', and the
-variable must be a user variable according to `user-variable-p'."
- (let ((vars)
- (val))
- (mapatoms (lambda (v)
- (and (boundp v)
- (user-variable-p v)
- (string-match color-theme-legal-variables
- (symbol-name v))
- (setq val (eval v))
- (add-to-list 'vars (cons v val)))))
- (sort vars (lambda (a b) (string< (car a) (car b))))))
-
-(defun color-theme-print-alist (alist)
- "Print ALIST."
- (insert "\n " (if alist "(" "nil"))
- (dolist (elem alist)
- (when (= (preceding-char) ?\))
- (insert "\n "))
- (prin1 elem (current-buffer)))
- (when (= (preceding-char) ?\)) (insert ")")))
-
-(defun color-theme-get-faces ()
- "Return a list of faces usable in a color theme.
-Such an alist may be installed by `color-theme-install-faces'. The
-faces returned must not match `color-theme-illegal-faces'."
- (let ((faces (color-theme-filter (face-list) color-theme-illegal-faces t)))
- ;; default face must come first according to comments in
- ;; custom-save-faces, the rest is to be sorted by name
- (cons 'default (sort (delq 'default faces) 'string-lessp))))
-
-(defun color-theme-get-face-definitions ()
- "Return face settings usable in a color-theme."
- (let ((faces (color-theme-get-faces)))
- (mapcar 'color-theme-spec faces)))
-
-(defun color-theme-print-faces (faces)
- "Print face settings for all faces returned by `color-theme-get-faces'."
- (when faces
- (insert "\n "))
- (dolist (face faces)
- (when (= (preceding-char) ?\))
- (insert "\n "))
- (prin1 face (current-buffer))))
-
-(defun color-theme-reset-faces ()
- "Reset face settings for all faces returned by `color-theme-get-faces'."
- (let ((faces (color-theme-get-faces))
- (face) (spec) (entry)
- (frame (if color-theme-is-global nil (selected-frame))))
- (while faces
- (setq entry (color-theme-spec (car faces)))
- (setq face (nth 0 entry))
- (setq spec '((t (nil))))
- (setq faces (cdr faces))
- (if (functionp 'face-spec-reset-face)
- (face-spec-reset-face face frame)
- (face-spec-set face spec frame)
- (if color-theme-is-global
- (put face 'face-defface-spec spec))))))
-
-(defun color-theme-print-theme (func doc params vars faces)
- "Print a theme into the current buffer.
-FUNC is the function name, DOC the doc string, PARAMS the
-frame parameters, VARS the variable bindings, and FACES
-the list of faces and their specs."
- (insert "(defun " (symbol-name func) " ()\n"
- " \"" doc "\"\n"
- " (interactive)\n"
- " (color-theme-install\n"
- " '(" (symbol-name func))
- ;; alist of frame parameters
- (color-theme-print-alist params)
- ;; alist of variables
- (color-theme-print-alist vars)
- ;; remaining elements of snapshot: face specs
- (color-theme-print-faces faces)
- (insert ")))\n")
- (insert "(add-to-list 'color-themes '(" (symbol-name func) " "
- " \"THEME NAME\" \"YOUR NAME\"))")
- (goto-char (point-min)))
-
-;;;###autoload
-(defun color-theme-print (&optional buf)
- "Print the current color theme function.
-
-You can contribute this function to <URL:news:gnu.emacs.sources> or
-paste it into your .emacs file and call it. That should recreate all
-the settings necessary for your color theme.
-
-Example:
-
- \(require 'color-theme)
- \(defun my-color-theme ()
- \"Color theme by Alex Schroeder, created 2000-05-17.\"
- \(interactive)
- \(color-theme-install
- '(...
- ...
- ...)))
- \(my-color-theme)
-
-If you want to use a specific color theme function, you can call the
-color theme function in your .emacs directly.
-
-Example:
-
- \(require 'color-theme)
- \(color-theme-gnome2)"
- (interactive)
- (message "Pretty printing current color theme function...")
- (switch-to-buffer (if buf
- buf
- (get-buffer-create "*Color Theme*")))
- (unless buf
- (setq buffer-read-only nil)
- (erase-buffer))
- ;; insert defun
- (insert "(eval-when-compile"
- " (require 'color-theme))\n")
- (color-theme-print-theme 'my-color-theme
- (concat "Color theme by "
- (if (string= "" user-full-name)
- (user-login-name)
- user-full-name)
- ", created " (format-time-string "%Y-%m-%d") ".")
- (color-theme-get-params)
- (color-theme-get-vars)
- (mapcar 'color-theme-spec (color-theme-get-faces)))
- (unless buf
- (emacs-lisp-mode))
- (goto-char (point-min))
- (message "Pretty printing current color theme function... done"))
-
-(defun color-theme-analyze-find-theme (code)
- "Find the sexpr that calls `color-theme-install'."
- (let (theme)
- (while (and (not theme) code)
- (when (eq (car code) 'color-theme-install)
- (setq theme code))
- (when (listp (car code))
- (setq theme (color-theme-analyze-find-theme (car code))))
- (setq code (cdr code)))
- theme))
-
-;; (equal (color-theme-analyze-find-theme
-;; '(defun color-theme-blue-eshell ()
-;; "Color theme for eshell faces only."
-;; (color-theme-install
-;; '(color-theme-blue-eshell
-;; nil
-;; (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
-;; (eshell-ls-backup-face ((t (:foreground "Grey"))))))))
-;; '(color-theme-install
-;; (quote
-;; (color-theme-blue-eshell
-;; nil
-;; (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
-;; (eshell-ls-backup-face ((t (:foreground "Grey")))))))))
-
-(defun color-theme-analyze-add-face (a b regexp faces)
- "If only one of A or B are in FACES, the other is added, and FACES is returned.
-If REGEXP is given, this is only done if faces contains a match for regexps."
- (when (or (not regexp)
- (catch 'found
- (dolist (face faces)
- (when (string-match regexp (symbol-name (car face)))
- (throw 'found t)))))
- (let ((face-a (assoc a faces))
- (face-b (assoc b faces)))
- (if (and face-a (not face-b))
- (setq faces (cons (list b (nth 1 face-a))
- faces))
- (if (and (not face-a) face-b)
- (setq faces (cons (list a (nth 1 face-b))
- faces))))))
- faces)
-
-;; (equal (color-theme-analyze-add-face
-;; 'blue 'violet nil
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; '((violet ((t (:foreground "blue"))))
-;; (blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; (equal (color-theme-analyze-add-face
-;; 'violet 'blue nil
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; '((violet ((t (:foreground "blue"))))
-;; (blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; (equal (color-theme-analyze-add-face
-;; 'violet 'blue "foo"
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; (equal (color-theme-analyze-add-face
-;; 'violet 'blue "blue"
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-;; '((violet ((t (:foreground "blue"))))
-;; (blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t))))))
-
-(defun color-theme-analyze-add-faces (faces)
- "Add missing faces to FACES and return it."
- ;; The most important thing is to add missing faces for the other
- ;; editor. These are the most important faces to check. The
- ;; following rules list two faces, A and B. If either of the two is
- ;; part of the theme, the other must be, too. The optional third
- ;; argument specifies a regexp. Only if an existing face name
- ;; matches this regexp, is the rule applied.
- (let ((rules '((font-lock-builtin-face font-lock-reference-face)
- (font-lock-doc-face font-lock-doc-string-face)
- (font-lock-constant-face font-lock-preprocessor-face)
- ;; In Emacs 21 `modeline' is just an alias for
- ;; `mode-line'. I recommend the use of
- ;; `modeline' until further notice.
- (modeline mode-line)
- (modeline modeline-buffer-id)
- (modeline modeline-mousable)
- (modeline modeline-mousable-minor-mode)
- (region primary-selection)
- (region zmacs-region)
- (font-lock-string-face dired-face-boring "^dired")
- (font-lock-function-name-face dired-face-directory "^dired")
- (default dired-face-executable "^dired")
- (font-lock-warning-face dired-face-flagged "^dired")
- (font-lock-warning-face dired-face-marked "^dired")
- (default dired-face-permissions "^dired")
- (default dired-face-setuid "^dired")
- (default dired-face-socket "^dired")
- (font-lock-keyword-face dired-face-symlink "^dired")
- (tool-bar menu))))
- (dolist (rule rules)
- (setq faces (color-theme-analyze-add-face
- (nth 0 rule) (nth 1 rule) (nth 2 rule) faces))))
- ;; The `fringe' face defines what the left and right borders of the
- ;; frame look like in Emacs 21. To give them default fore- and
- ;; background colors, use (fringe ((t (nil)))) in your color theme.
- ;; Usually it makes more sense to choose a color slightly lighter or
- ;; darker from the default background.
- (unless (assoc 'fringe faces)
- (setq faces (cons '(fringe ((t (nil)))) faces)))
- ;; The tool-bar should not be part of the frame-parameters, since it
- ;; should not appear or disappear depending on the color theme. The
- ;; apppearance of the toolbar, however, can be changed by the color
- ;; theme. For Emacs 21, use the `tool-bar' face. The easiest way
- ;; to do this is to give it the default fore- and background colors.
- ;; This can be achieved using (tool-bar ((t (nil)))) in the theme.
- ;; Usually it makes more sense, however, to provide the same colors
- ;; as used in the `menu' face, and to specify a :box attribute. In
- ;; order to alleviate potential Emacs/XEmacs incompatibilities,
- ;; `toolbar' will be defined as an alias for `tool-bar' if it does
- ;; not exist, and vice-versa. This is done eventhough the face
- ;; `toolbar' seems to have no effect on XEmacs. If you look at
- ;; XEmacs lisp/faces.el, however, you will find that it is in fact
- ;; referenced for XPM stuff.
- (unless (assoc 'tool-bar faces)
- (setq faces (cons '(tool-bar ((t (nil)))) faces)))
- ;; Move the default face back to the front, and sort the rest.
- (unless (eq (caar faces) 'default)
- (let ((face (assoc 'default faces)))
- (setq faces (cons face
- (sort (delete face faces)
- (lambda (a b)
- (string-lessp (car a) (car b))))))))
- faces)
-
-(defun color-theme-analyze-remove-heights (faces)
- "Remove :height property where it is an integer and return FACES."
- ;; I don't recommend making font sizes part of a color theme. Most
- ;; users would be surprised to see their font sizes change when they
- ;; install a color-theme. Therefore, remove all :height attributes
- ;; if the value is an integer. If the value is a float, this is ok
- ;; -- the value is relative to the default height. One notable
- ;; exceptions is for a color-theme created for visually impaired
- ;; people. These *must* use a larger font in order to be usable.
- (let (result)
- (dolist (face faces)
- (let ((props (cadar (nth 1 face))))
- (if (and (plist-member props :height)
- (integerp (plist-get props :height)))
- (setq props (color-theme-plist-delete props :height)
- result (cons (list (car face) `((t ,props)))
- result))
- (setq result (cons face result)))))
- (nreverse result)))
-
-;; (equal (color-theme-analyze-remove-heights
-;; '((blue ((t (:foreground "blue" :height 2))))
-;; (bold ((t (:bold t :height 1.0))))))
-;; '((blue ((t (:foreground "blue"))))
-;; (bold ((t (:bold t :height 1.0))))))
-
-;;;###autoload
-(defun color-theme-analyze-defun ()
- "Once you have a color-theme printed, check for missing faces.
-This is used by maintainers who receive a color-theme submission
-and want to make sure it follows the guidelines by the color-theme
-author."
- ;; The support for :foreground and :background attributes works for
- ;; Emacs 20 and 21 as well as for XEmacs. :inverse-video is taken
- ;; care of while printing color themes.
- (interactive)
- ;; Parse the stuff and find the call to color-theme-install
- (save-excursion
- (save-restriction
- (narrow-to-defun)
- ;; define the function
- (eval-defun nil)
- (goto-char (point-min))
- (let* ((code (read (current-buffer)))
- (theme (color-theme-canonic
- (eval
- (cadr
- (color-theme-analyze-find-theme
- code)))))
- (func (color-theme-function theme))
- (doc (documentation func t))
- (variables (color-theme-variables theme))
- (faces (color-theme-faces theme))
- (params (color-theme-frame-params theme)))
- (setq faces (color-theme-analyze-remove-heights
- (color-theme-analyze-add-faces faces)))
- ;; Remove any variable bindings of faces that point to their
- ;; symbol? Perhaps not, because another theme might want to
- ;; change this, so it is important to be able to reset them.
- ;; (let (result)
- ;; (dolist (var variables)
- ;; (unless (eq (car var) (cdr var))
- ;; (setq result (cons var result))))
- ;; (setq variables (nreverse result)))
- ;; Now modify the theme directly.
- (setq theme (color-theme-analyze-find-theme code))
- (setcdr (cadadr theme) (list params variables faces))
- (message "Pretty printing analysed color theme function...")
- (with-current-buffer (get-buffer-create "*Color Theme*")
- (setq buffer-read-only nil)
- (erase-buffer)
- ;; insert defun
- (color-theme-print-theme func doc params variables faces)
- (emacs-lisp-mode))
- (message "Pretty printing analysed color theme function... done")
- (ediff-buffers (current-buffer)
- (get-buffer "*Color Theme*"))))))
-
-;;; Creating a snapshot of the current color theme
-
-(defun color-theme-snapshot nil)
-
-;;;###autoload
-(defun color-theme-make-snapshot ()
- "Return the definition of the current color-theme.
-The function returned will recreate the color-theme in use at the moment."
- (eval `(lambda ()
- "The color theme in use when the selection buffer was created.
-\\[color-theme-select] creates the color theme selection buffer. At the
-same time, this snapshot is created as a very simple undo mechanism.
-The snapshot is created via `color-theme-snapshot'."
- (interactive)
- (color-theme-install
- '(color-theme-snapshot
- ;; alist of frame parameters
- ,(color-theme-get-params)
- ;; alist of variables
- ,(color-theme-get-vars)
- ;; remaining elements of snapshot: face specs
- ,@(color-theme-get-face-definitions))))))
-
-
-
-;;; Handling the various parts of a color theme install
-
-(defvar color-theme-frame-param-frobbing-rules
- '((foreground-color default foreground)
- (background-color default background))
- "List of rules to use when frobbing faces based on frame parameters.
-This is only necessary for XEmacs, because in Emacs 21 changing the
-frame paramters automatically affects the relevant faces.")
-
-;; fixme: silent the bytecompiler with set-face-property
-(defun color-theme-frob-faces (params)
- "Change certain faces according to PARAMS.
-This uses `color-theme-frame-param-frobbing-rules'."
- (dolist (rule color-theme-frame-param-frobbing-rules)
- (let* ((param (nth 0 rule))
- (face (nth 1 rule))
- (prop (nth 2 rule))
- (val (cdr (assq param params)))
- (frame (if color-theme-is-global nil (selected-frame))))
- (when val
- (set-face-property face prop val frame)))))
-
-(defun color-theme-alist-reduce (old-list)
- "Reduce OLD-LIST.
-The resulting list will be newly allocated and will not contain any elements
-with duplicate cars. This will speed the installation of new themes by
-only installing unique attributes."
- (let (new-list)
- (dolist (elem old-list)
- (when (not (assq (car elem) new-list))
- (setq new-list (cons elem new-list))))
- new-list))
-
-(defun color-theme-install-frame-params (params)
- "Change frame parameters using alist PARAMETERS.
-
-If `color-theme-is-global' is non-nil, all frames are modified using
-`modify-frame-parameters' and the PARAMETERS are prepended to
-`default-frame-alist'. The value of `initial-frame-alist' is not
-modified. If `color-theme-is-global' is nil, only the selected frame is
-modified. If `color-theme-is-cumulative' is nil, the frame parameters
-are restored from `color-theme-original-frame-alist'.
-
-If the current frame parameters have a parameter `minibuffer' with
-value `only', then the frame parameters are not installed, since this
-indicates a dedicated minibuffer frame.
-
-Called from `color-theme-install'."
- (setq params (color-theme-filter
- params color-theme-legal-frame-parameters))
- ;; We have a new list in params now, therefore we may use
- ;; destructive nconc.
- (if color-theme-is-global
- (let ((frames (frame-list)))
- (if (or color-theme-is-cumulative
- (null color-theme-original-frame-alist))
- (setq default-frame-alist
- (append params (color-theme-alist default-frame-alist))
- minibuffer-frame-alist
- (append params (color-theme-alist minibuffer-frame-alist)))
- (setq default-frame-alist
- (append params color-theme-original-frame-alist)
- minibuffer-frame-alist
- (append params (color-theme-alist minibuffer-frame-alist))))
- (setq default-frame-alist
- (color-theme-alist-reduce default-frame-alist)
- minibuffer-frame-alist
- (color-theme-alist-reduce minibuffer-frame-alist))
- (dolist (frame frames)
- (let ((params (if (eq 'only (cdr (assq 'minibuffer (frame-parameters frame))))
- minibuffer-frame-alist
- default-frame-alist)))
- (condition-case var
- (modify-frame-parameters frame params)
- (error (message "Error using params %S: %S" params var))))))
- (condition-case var
- (modify-frame-parameters (selected-frame) params)
- (error (message "Error using params %S: %S" params var))))
- (when color-theme-xemacs-p
- (color-theme-frob-faces params)))
-
-;; (setq default-frame-alist (cons '(height . 30) default-frame-alist))
-
-(defun color-theme-install-variables (vars)
- "Change variables using alist VARS.
-All variables matching `color-theme-legal-variables' are set.
-
-If `color-theme-is-global' and `color-theme-xemacs-p' are nil, variables
-are made frame-local before setting them. Variables are set using `set'
-in either case. This may lead to problems if changing the variable
-requires the usage of the function specified with the :set tag in
-defcustom declarations.
-
-Called from `color-theme-install'."
- (let ((vars (color-theme-filter vars color-theme-legal-variables)))
- (dolist (var vars)
- (if (or color-theme-is-global color-theme-xemacs-p)
- (set (car var) (cdr var))
- (make-variable-frame-local (car var))
- (modify-frame-parameters (selected-frame) (list var))))))
-
-(defun color-theme-install-faces (faces)
- "Change faces using FACES.
-
-Change faces for all frames and create any faces listed in FACES which
-don't exist. The modified faces will be marked as \"unchanged from
-its standard setting\". This is OK, since the changes made by
-installing a color theme should never by saved in .emacs by
-customization code.
-
-FACES should be a list where each entry has the form:
-
- (FACE SPEC)
-
-See `defface' for the format of SPEC.
-
-If `color-theme-is-global' is non-nil, faces are modified on all frames
-using `face-spec-set'. If `color-theme-is-global' is nil, faces are
-only modified on the selected frame. Non-existing faces are created
-using `make-empty-face' in either case. If `color-theme-is-cumulative'
-is nil, all faces are reset before installing the new faces.
-
-Called from `color-theme-install'."
- ;; clear all previous faces
- (when (not color-theme-is-cumulative)
- (color-theme-reset-faces))
- ;; install new faces
- (let ((faces (color-theme-filter faces color-theme-illegal-faces t))
- (frame (if color-theme-is-global nil (selected-frame))))
- (dolist (entry faces)
- (let ((face (nth 0 entry))
- (spec (nth 1 entry)))
- (or (facep face)
- (make-empty-face face))
- ;; remove weird properties from the default face only
- (when (eq face 'default)
- (setq spec (color-theme-spec-filter spec)))
- ;; Emacs/XEmacs customization issues: filter out :bold when
- ;; the spec contains :weight, etc, such that the spec remains
- ;; "valid" for custom.
- (setq spec (color-theme-spec-compat spec))
- ;; using a spec of ((t (nil))) to reset a face doesn't work
- ;; in Emacs 21, we use the new function face-spec-reset-face
- ;; instead
- (if (and (functionp 'face-spec-reset-face)
- (equal spec '((t (nil)))))
- (face-spec-reset-face face frame)
- (condition-case var
- (progn
- (face-spec-set face spec frame)
- (if color-theme-is-global
- (put face 'face-defface-spec spec)))
- (error (message "Error using spec %S: %S" spec var))))))))
-
-;; `custom-set-faces' is unusable here because it doesn't allow to set
-;; the faces for one frame only.
-
-;; Emacs `face-spec-set': If FRAME is nil, the face is created and
-;; marked as a customized face. This is achieved by setting the
-;; `face-defface-spec' property. If we don't, new frames will not be
-;; created using the face we installed because `face-spec-set' is
-;; broken: If given a FRAME of nil, it will not set the default faces;
-;; instead it will walk through all the frames and set modify the faces.
-;; If we do set a property (`saved-face' or `face-defface-spec'),
-;; `make-frame' will correctly use the faces we defined with our color
-;; theme. If we used the property `saved-face',
-;; `customize-save-customized' will save all the faces installed as part
-;; of a color-theme in .emacs. That's why we use the
-;; `face-defface-spec' property.
-
-
-
-;;; Theme accessor functions, canonicalization, merging, comparing
-
-(defun color-theme-canonic (theme)
- "Return the canonic form of THEME.
-This deals with all the backwards compatibility stuff."
- (let (function frame-params variables faces)
- (when (functionp (car theme))
- (setq function (car theme)
- theme (cdr theme)))
- (setq frame-params (car theme)
- theme (cdr theme))
- ;; optional variable defintions (for backwards compatibility)
- (when (listp (caar theme))
- (setq variables (car theme)
- theme (cdr theme)))
- ;; face definitions
- (setq faces theme)
- (list function frame-params variables faces)))
-
-(defun color-theme-function (theme)
- "Return function used to create THEME."
- (nth 0 theme))
-
-(defun color-theme-frame-params (theme)
- "Return frame-parameters defined by THEME."
- (nth 1 theme))
-
-(defun color-theme-variables (theme)
- "Return variables set by THEME."
- (nth 2 theme))
-
-(defun color-theme-faces (theme)
- "Return faces defined by THEME."
- (nth 3 theme))
-
-(defun color-theme-merge-alists (&rest alists)
- "Merges all the alist arguments into one alist.
-Only the first instance of every key will be part of the resulting
-alist. Membership will be tested using `assq'."
- (let (result)
- (dolist (l alists)
- (dolist (entry l)
- (unless (assq (car entry) result)
- (setq result (cons entry result)))))
- (nreverse result)))
-;; (color-theme-merge-alists '((a . 1) (b . 2)))
-;; (color-theme-merge-alists '((a . 1) (b . 2) (a . 3)))
-;; (color-theme-merge-alists '((a . 1) (b . 2)) '((a . 3)))
-;; (color-theme-merge-alists '((a . 1) (b . 2)) '((c . 3)))
-;; (color-theme-merge-alists '((a . 1) (b . 2)) '((c . 3) (d . 4)))
-;; (color-theme-merge-alists '((a . 1) (b . 2)) '((c . 3) (d . 4) (b . 5)))
-
-;;;###autoload
-(defun color-theme-compare (theme-a theme-b)
- "Compare two color themes.
-This will print the differences between installing THEME-A and
-installing THEME-B. Note that the order is important: If a face is
-defined in THEME-A and not in THEME-B, then this will not show up as a
-difference, because there is no reset before installing THEME-B. If a
-face is defined in THEME-B and not in THEME-A, then this will show up as
-a difference."
- (interactive
- (list
- (intern
- (completing-read "Theme A: "
- (mapcar (lambda (i) (list (symbol-name (car i))))
- color-themes)
- (lambda (i) (string-match "color-theme" (car i)))))
- (intern
- (completing-read "Theme B: "
- (mapcar (lambda (i) (list (symbol-name (car i))))
- color-themes)
- (lambda (i) (string-match "color-theme" (car i)))))))
- ;; install the themes in a new frame and get the definitions
- (let ((color-theme-is-global nil))
- (select-frame (make-frame))
- (funcall theme-a)
- (setq theme-a (list theme-a
- (color-theme-get-params)
- (color-theme-get-vars)
- (color-theme-get-face-definitions)))
- (funcall theme-b)
- (setq theme-b (list theme-b
- (color-theme-get-params)
- (color-theme-get-vars)
- (color-theme-get-face-definitions)))
- (delete-frame))
- (let ((params (set-difference
- (color-theme-frame-params theme-b)
- (color-theme-frame-params theme-a)
- :test 'equal))
- (vars (set-difference
- (color-theme-variables theme-b)
- (color-theme-variables theme-a)
- :test 'equal))
- (faces (set-difference
- (color-theme-faces theme-b)
- (color-theme-faces theme-a)
- :test 'equal)))
- (list 'diff
- params
- vars
- faces)))
-
-
-
-;;; Installing a color theme
-;;;###autoload
-(defun color-theme-install (theme)
- "Install a color theme defined by frame parameters, variables and faces.
-
-The theme is installed for all present and future frames; any missing
-faces are created. See `color-theme-install-faces'.
-
-THEME is a color theme definition. See below for more information.
-
-If you want to install a color theme from your .emacs, use the output
-generated by `color-theme-print'. This produces color theme function
-which you can copy to your .emacs.
-
-A color theme definition is a list:
-\([FUNCTION] FRAME-PARAMETERS VARIABLE-SETTINGS FACE-DEFINITIONS)
-
-FUNCTION is the color theme function which called `color-theme-install'.
-This is no longer used. There was a time when this package supported
-automatic factoring of color themes. This has been abandoned.
-
-FRAME-PARAMETERS is an alist of frame parameters. These are installed
-with `color-theme-install-frame-params'. These are installed last such
-that any changes to the default face can be changed by the frame
-parameters.
-
-VARIABLE-DEFINITIONS is an alist of variable settings. These are
-installed with `color-theme-install-variables'.
-
-FACE-DEFINITIONS is an alist of face definitions. These are installed
-with `color-theme-install-faces'.
-
-If `color-theme-is-cumulative' is nil, a color theme will undo face and
-frame-parameter settings of previous color themes."
- (setq theme (color-theme-canonic theme))
- (color-theme-install-variables (color-theme-variables theme))
- (color-theme-install-faces (color-theme-faces theme))
- ;; frame parameters override faces
- (color-theme-install-frame-params (color-theme-frame-params theme))
- (when color-theme-history-max-length
- (color-theme-add-to-history
- (car theme))))
-
-
-
-;; Sharing your stuff
-;;;###autoload
-(defun color-theme-submit ()
- "Submit your color-theme to the maintainer."
- (interactive)
- (require 'reporter)
- (let ((reporter-eval-buffer (current-buffer))
- final-resting-place
- after-sep-pos
- (reporter-status-message "Formatting buffer...")
- (reporter-status-count 0)
- (problem "Yet another color-theme")
- (agent (reporter-compose-outgoing))
- (mailbuf (current-buffer))
- hookvar)
- ;; do the work
- (require 'sendmail)
- ;; If mailbuf did not get made visible before, make it visible now.
- (let (same-window-buffer-names same-window-regexps)
- (pop-to-buffer mailbuf)
- ;; Just in case the original buffer is not visible now, bring it
- ;; back somewhere
- (and pop-up-windows (display-buffer reporter-eval-buffer)))
- (goto-char (point-min))
- (mail-position-on-field "to")
- (insert color-theme-maintainer-address)
- (mail-position-on-field "subject")
- (insert problem)
- ;; move point to the body of the message
- (mail-text)
- (setq after-sep-pos (point))
- (unwind-protect
- (progn
- (setq final-resting-place (point-marker))
- (goto-char final-resting-place))
- (color-theme-print (current-buffer))
- (goto-char final-resting-place)
- (insert "\n\n")
- (goto-char final-resting-place)
- (insert "Hello there!\n\nHere's my color theme named: ")
- (set-marker final-resting-place nil))
- ;; compose the minibuf message and display this.
- (let* ((sendkey-whereis (where-is-internal
- (get agent 'sendfunc) nil t))
- (abortkey-whereis (where-is-internal
- (get agent 'abortfunc) nil t))
- (sendkey (if sendkey-whereis
- (key-description sendkey-whereis)
- "C-c C-c")); TBD: BOGUS hardcode
- (abortkey (if abortkey-whereis
- (key-description abortkey-whereis)
- "M-x kill-buffer"))); TBD: BOGUS hardcode
- (message "Enter a message and type %s to send or %s to abort."
- sendkey abortkey))))
-
-
-
-;; Use this to define themes
-(defmacro define-color-theme (name author description &rest forms)
- (let ((n name))
- `(progn
- (add-to-list 'color-themes
- (list ',n
- (upcase-initials
- (replace-in-string
- (replace-in-string
- (symbol-name ',n) "^color-theme-" "") "-" " "))
- ,author))
- (defun ,n ()
- ,description
- (interactive)
- ,@forms))))
-
-
-;;; FIXME: is this useful ??
-;;;###autoload
-(defun color-theme-initialize ()
- "Initialize the color theme package by loading color-theme-libraries."
- (interactive)
-
- (cond ((and (not color-theme-load-all-themes)
- color-theme-directory)
- (setq color-theme-libraries
- (directory-files color-theme-directory t "^color-theme")))
- (color-theme-directory
- (push (cdr (directory-files color-theme-directory t "^color-theme"))
- color-theme-libraries)))
- (dolist (library color-theme-libraries)
- (load library)))
-
-(when nil
- (setq color-theme-directory "themes/"
- color-theme-load-all-themes nil)
- (color-theme-initialize)
-)
-;; TODO: I don't like all those function names cluttering up my namespace.
-;; Instead, a hashtable for the color-themes should be created. Now that
-;; define-color-theme is around, it should be easy to change in just the
-;; one place.
-
-
-(provide 'color-theme)
-
-;;; color-theme.el ends here
diff --git a/web/elisp/org-batch.el b/web/elisp/org-batch.el
deleted file mode 100644
index 058ef54..0000000
--- a/web/elisp/org-batch.el
+++ /dev/null
@@ -1,27 +0,0 @@
-;; emacs org-mode batch configuration
-
-;; local emacs extensions
-(add-to-list 'load-path "./elisp")
-
-;;; ORG mode
-(require 'org-install)
-(require 'org-exp-blocks)
-(require 'htmlize)
-
-;; set auto load on .org files
-(add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode))
-
-;; org mode customisations
-(setq org-export-htmlize-output-type 'css)
-
-
-'(org-export-blocks (quote ((comment org-export-blocks-format-comment t) (ditaa org-export-blocks-format-ditaa nil) (dot org-export-blocks-format-dot t) (r org-export-blocks-format-R nil) (R org-export-blocks-format-R nil))))
-'(org-export-html-inline-images t)
-'(org-export-html-use-infojs t)
-
-
-'(org-export-htmlize-output-type "css")
-'(org-export-html-validation-link "<p class=\"xhtml-validation\"><a href=\"http://validator.w3.org/check?uri=referer\">Validate XHTML 1.0</a></p>")
-'(org-export-html-with-timestamp nil)
-'(org-modules (quote (org-bbdb org-bibtex org-info org-jsinfo org-irc org-w3m org-mouse org-eval org-eval-light org-exp-bibtex org-man org-mtags org-panel org-R org-special-blocks org-exp-blocks)))
-
diff --git a/web/elisp/themes/color-theme-twilight.el b/web/elisp/themes/color-theme-twilight.el
deleted file mode 100644
index a6f9d28..0000000
--- a/web/elisp/themes/color-theme-twilight.el
+++ /dev/null
@@ -1,69 +0,0 @@
-;; Twilight Colour Theme for Emacs.
-;;
-;; Defines a colour scheme resembling that of the original TextMate Twilight colour theme.
-;; To use add the following to your .emacs file (requires the color-theme package):
-;;
-;; (require 'color-theme)
-;; (color-theme-initialize)
-;; (load-file "~/.emacs.d/twilight-emacs/color-theme-twilight.el")
-;;
-;; And then (color-theme-twilight) to activate it.
-;;
-;; Several areas still require improvement such as recognition of code that ruby-mode doesn't
-;; yet pick up (eg. parent classes), Rails/Merb keywords, or non Ruby code related areas
-;; (eg. dired, HTML, etc). Please feel free to customize further and send in any improvements,
-;; patches most welcome.
-;;
-;; MIT License Copyright (c) 2008 Marcus Crafter <crafterm@redartisan.com>
-;; Credits due to the excellent TextMate Twilight theme
-;;
-;; Thanks to Travis Jeffery for ido-mode and fixes to the minibuffer-prompt to fit in with the rest of the theme
-;;
-
-(defun color-theme-twilight ()
- "Color theme by Marcus Crafter, based off the TextMate Twilight theme, created 2008-04-18"
- (interactive)
- (color-theme-install
- '(color-theme-twilight
- ((background-color . "#141414")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "#A7A7A7")
- (foreground-color . "#F8F8F8")
- (mouse-color . "sienna1"))
- (default ((t (:background "#141414" :foreground "#CACACA"))))
- (blue ((t (:foreground "blue"))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "#141414" :foreground "#CACACA"))))
- (font-lock-builtin-face ((t (:foreground "#CACACA"))))
- (font-lock-comment-face ((t (:foreground "#5F5A60"))))
- (font-lock-constant-face ((t (:foreground "#CF6A4C"))))
- (font-lock-doc-string-face ((t (:foreground "DarkOrange"))))
- (font-lock-function-name-face ((t (:foreground "#9B703F"))))
- (font-lock-keyword-face ((t (:foreground "#CDA869"))))
- (font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
- (font-lock-reference-face ((t (:foreground "SlateBlue"))))
-
- (font-lock-regexp-grouping-backslash ((t (:foreground "#E9C062"))))
- (font-lock-regexp-grouping-construct ((t (:foreground "red"))))
-
- (minibuffer-prompt ((t (:foreground "#5F5A60"))))
- (ido-subdir ((t (:foreground "#CF6A4C"))))
- (ido-first-match ((t (:foreground "#8F9D6A"))))
- (ido-only-match ((t (:foreground "#8F9D6A"))))
- (mumamo-background-chunk-submode ((t (:background "#222222"))))
-
- (font-lock-string-face ((t (:foreground "#8F9D6A"))))
- (font-lock-type-face ((t (:foreground "#9B703F"))))
- (font-lock-variable-name-face ((t (:foreground "#7587A6"))))
- (font-lock-warning-face ((t (:background "#EE799F" :foreground "red"))))
- (gui-element ((t (:background "#D4D0C8" :foreground "black"))))
- (region ((t (:background "#27292A"))))
- (mode-line ((t (:background "grey75" :foreground "black"))))
- (highlight ((t (:background "#111111"))))
- (highline-face ((t (:background "SeaGreen"))))
- (left-margin ((t (nil))))
- (text-cursor ((t (:background "yellow" :foreground "black"))))
- (toolbar ((t (nil))))
- (underline ((nil (:underline nil))))
- (zmacs-region ((t (:background "snow" :foreground "blue")))))))
diff --git a/web/helpers.inc.php b/web/helpers.inc.php
deleted file mode 100644
index 3d2f28b..0000000
--- a/web/helpers.inc.php
+++ /dev/null
@@ -1,44 +0,0 @@
-<?php
- // Return the full path to a file under web DocumentRoot
- // * DO NOT PASS USER INPUT TO THAT FUNCTION *
- // as it could result in displaying arbitrary files.
- function www_path($path = "")
- {
- if (empty($path)) return DYNE_WWW;
- else return DYNE_WWW . "/" . $path;
- }
-
- function www_contents($path)
- {
- return file_get_contents(www_path($path));
- }
-
- function display_file($filename, $prefix = "", $suffix = "")
- {
- if (($contents = www_contents($filename)))
- echo $prefix . $contents . $suffix;
- }
-
-///// auxiliary functions
-function showfile($f) {
- $fd = fopen("$f","r");
- if(!$fd) { $text = "<h1>ERROR: $f not found</h1>";
- } else {
- $st = fstat($fd);
- $text = fread($fd,$st["size"]); fclose($fd);
- }
- echo($text);
-}
-
-function stripslashes_array($value) {
- $value = is_array($value) ?
- array_map('stripslashes_array', $value) :
- stripslashes($value);
-
- return $value;
-}
-
-function div($str) { echo("\n<div id=\"$str\">\n"); }
-function section($str) { echo("\n<section id=\"$str\">\n"); }
-
-?>
diff --git a/web/index.php b/web/index.php
deleted file mode 100644
index 0dcceae..0000000
--- a/web/index.php
+++ /dev/null
@@ -1,59 +0,0 @@
-<?php
-
-/* TO CHANGE WEBSITE CONTENTS DON'T EDIT THIS FILE
- instead you should be modifying index.org
- and in general all *.org files (see orgmode.org)
- these files are then rendered serverside
-
- THIS PHP FILE CONTAINS NO RELEVANT CONTENT */
-
-require_once("helpers.inc.php");
-
-define("DYNE_DEBUG_RENDERING_TIME", false);
-if (DYNE_DEBUG_RENDERING_TIME) {
- require_once "include/simple_timer.class.php";
- $smarty->assign("timer", new SimpleTimer);
-}
-
-/* Smarty template class configuration */
-if (!defined('SMARTY_DIR')) {
- define("SMARTY_DIR", "/usr/share/php/smarty/libs/"); }
-if (!is_dir(constant("SMARTY_DIR")) || !require_once("smarty/Smarty.class.php")) {
- echo "SMARTY is supposed to be installed in " . constant("SMARTY_DIR") . " but is not.";
- echo "Install it or edit SMARTY_DIR in " . __FILE__;
- exit;
-}
-
-global $smarty;
-$smarty = new Smarty;
-$smarty->compile_check = true;
-$smarty->debugging = false;
-$smarty->caching = 0;
-
-$smarty->cache_dir = "cache";
-$smarty->template_dir = "templates";
-$smarty->compile_dir = "templates_c";
-$smarty->plugins_dir = array('/usr/share/php/smarty/plugins');
-
-
-$smarty->assign("page_class", "software org-mode");
-$smarty->assign("page_hgroup", "<h1>FreeJ</h1>");
-$smarty->assign("page_title", "free vision mixer");
-
-
-$smarty->assign("pagename","software");
-$smarty->display("_header.tpl");
-
-
-// sidebar
-div("menu");
-$smarty->display("software/doctypes.tpl");
-showfile("index-toc.html");
-echo("</div>");
-
-// page content
-showfile("index-body.html");
-
-$smarty->display("_footer.tpl");
-
-?>
diff --git a/web/stylesheets/dyne.css b/web/stylesheets/dyne.css
deleted file mode 100644
index cf9fa23..0000000
--- a/web/stylesheets/dyne.css
+++ /dev/null
@@ -1,131 +0,0 @@
-body {
- background-color: #fed;
- color: #000;
- font-family: monospace;
- font-size: medium;
-}
-
-a { text-decoration: none }
-a:link { color: #a60; }
-a:visited { color: #840 }
-a:hover,a:focus,a:active { text-decoration: underline }
-
-#dyne_links {
- margin: 0 auto;
- padding: 0;
- list-style: none;
- text-align: center;
- font-size: larger;
- font-weight: bold;
-}
-#dyne_links li {
- display: inline;
-}
-#dyne_links li.org {
- font-size: medium;
- font-weight: normal;
-}
-
-header {
- background-color: #fed;
- position: fixed;
- left: 0;
- right: 0;
- z-index: 666;
-}
-
-header hgroup, section {
- position: absolute;
- left: 0;
- right: 0;
-}
-header hgroup, #intro {
- margin-left: 2.5%;
- margin-right: 70%
-}
-header hgroup p {
- margin: 5px
-}
-#intro {
- position: fixed;
- margin-top: 6em;
- text-align: center
-}
-#intro p { font-weight: bold; text-align: justify; line-height: 1.5em }
-#intro img { }
-#sites {
- margin-left: 35%;
- margin-right: 2.5%;
- margin-top: 3em
-}
-#sites img {
- background-color: #fed;
- border: 24px solid #fed;
- margin: 0 3% 0 0;
- width: 48px;
- height: 48px;
- float: left
-}
-
-header hgroup {
- padding-top: 1em
-}
-header h1 {
- margin: 0
-}
-
-
-#sites dl {
- margin: 0
-}
-#software, #events {
- margin-top: 180px;
-}
-#software {
- margin-left: 35%;
- margin-right: 35%;
-}
-#events {
- margin-left: 70%;
-}
-
-.data { display: none }
-
-footer {
- background-color: #fed;
- position: fixed;
- bottom: 0;
- padding: 0 10px;
- padding-bottom: 10px;
- left: 0; right: 0;
- font-size: smaller;
- height: 70px;
-}
-footer:hover,footer:focus {
- height: auto;
-}
-footer:hover section, footer:focus section,
-footer:hover section h2, footer:focus section h2,
-footer:hover #clustrMaps
-{
- display: block
-}
-
-#self-promotion,#badges { width: 15% }
-
-footer ul {
- list-style: none;
- margin: 0;
- padding: 0;
-}
-
-footer section {
- position: relative;
- display: none;
- float: left;
- width: 33%;
-}
-footer section h2 { display: none }
-#credits { display: block }
-#clustrMaps { display: none }
-footer section.copyright { display: block } \ No newline at end of file
diff --git a/web/stylesheets/dyne5.css b/web/stylesheets/dyne5.css
deleted file mode 100644
index 68ee63e..0000000
--- a/web/stylesheets/dyne5.css
+++ /dev/null
@@ -1,530 +0,0 @@
-html.foundation #foundation,
-html.software #software,
-html.culture #culture,
-html.events #events,
-html.contact #contact,
-html.discussion #discussion {
- width: 35%;
-}
-
-body {
- background-color: #fed;
- color: #333;
- font-family: Arial, Helvetica, sans-serif;
- font-size: 10pt;
- margin: 0;
- padding: 0;
-}
-
-a:link, a:visited { text-decoration: none; font-weight: bold }
-a:hover, a:focus, a:active { text-decoration: underline }
-a:link { color: #a60 }
-a:visited { color: #840 }
-a:hover, a:focus { color: #000 }
-a:active { color: #fed }
-
-img { border: 0}
-
-header {
- background: #fed url(/images/bg.png) top left repeat-x;
- margin-top: 10px;
-}
-
-header nav {
- margin: 1em;
-}
-header nav ul {
- list-style: none;
- margin: 0 auto;
- width: 50em;
-}
-header nav ul li {
- display: inline;
- font-weight: bold;
-}
-header nav ul li:first-child,
-header nav ul li:last-child
-{
- font-weight: normal;
- font-size: smaller;
-}
-header nav ul:first-child:before {
- content: " - -( ";
-}
-header nav ul:last-child:after {
- content: " )- - "
-}
-
-header hgroup {
- font-family: monospace;
-}
-header hgroup h1 {
- font-size: 18pt;
- margin: 10px 0 0 1em;
-}
-#software h1,
-#events h1 {
- font-size: 18pt;
- margin: 0;
-}
-header hgroup h2 {
- margin-bottom: 0;
- margin: 0 2em 1em 2em;
- font-weight: normal;
- font-size: 14pt;
-}
-header hgroup p {
- margin: 20px 2em -10px 2em;
-}
-
-body > section {
- float: left;
- margin: 0;
- padding: 0;
-}
-section p {
- margin: 1em;
-}
-#about {
- margin-left: 0.5em;
- text-align: justify;
-}
-#culture {
- width: 35%;
-}
-#software, #events {
- margin-top: -2.25em;
- width: 20%;
-}
-#software hgroup h2,
-#events hgroup h2 {
- margin-top: 0;
- font-size: 10pt;
- font-weight: bold;
-}
-#events h3 {
- font-size: medium;
- font-weight: normal;
- margin: 0.25em 2em;
-}
-#events h3:before {
- content: "clock ";
-}
-
-
-#software #no_shit {
- margin: 0;
- padding: 0;
-
-}
-
-#moebius {
- display: block;
- margin: 0 auto;
- text-align: center;
-}
-
-html.contact #contact { width: 65% }
-html.contact #foundation img { float: left; margin: 0 10px 25px 0; }
-html.contact #foundation h2 { margin: 0.5em }
-html.contact #foundation p { margin: 1em; text-align: justify }
-html.contact #foundation address { margin-left: 1em }
-
-html.contact #foundation { width: 35%; padding:0 1em}
-
-footer {
- clear: both;
- display: compact;
- font-size: smaller;
- height: 25em;
-}
-footer hr {
- background-color: #f0e0d0;
- border: 0;
- height: 1px;
-}
-footer ul {
- list-style: none;
- margin: 0;
- padding: 0;
-}
-footer section {
- width: 8em;
- float: right;
-}
-footer section h2 {
- text-align: center;
- display: none; }
-#cluster_maps {
- text-align: center; }
-#disclaimer {
- font-size: smaller;
- text-align: justify;
- width: 20em; }
-#credits {
- text-align: right;
- width: 17em; }
-#recognition {
- margin-top: 1em;
- text-align: center; }
-#badges {
- margin-top: 2em;
- text-align: center; }
-/**
- * Google Search
-**/
-
-#google_search fieldset {
- border: 0;
-}
-#google_search input {
- background-color: #fed;
- border: 1px solid #a60;
-}
-#google_search input[type=submit] {
- font-weight: bold;
-}
-#google_search input:hover,
-#google_search input:focus {
- background-color: #fff;
-}
-
-/**
- * homepage aka foundation
-**/
-
-html.foundation #foundation { width: 25%; }
-html.foundation #culture { width: 25%; }
-html.foundation #software { width: 20%; }
-html.foundation #events { width: 30%; }
-
-html.foundation #foundation p {
- text-align: justify;
-}
-html.foundation #foundation {
- text-align: center;
-}
-
-html.foundation #software p,
-html.foundation #software article,
-html.foundation #events p,
-html.foundation #events article {
- margin: 1em 0.5em;
- font-size: smaller;
-}
-html.foundation #software article .version {
- font-weight: bold;
-}
-
-html.foundation #sites article {
-}
-
-html.foundation #weaver_birds {
- font-size: smaller;
-}
-.dharma_wheel { font-size: 400%; line-height: 20pt; display: block; margin: 0.5em auto; text-align: center }
-
-#sites { margin-top: 2em }
-
-#selected_site {
- margin: 0.5em;
-}
-#selected_site img {
- width: 48px;
- margin-top: 6px;
- margin-right: 12px;
- height: 48px;
- float: left;
-}
-#selected_site h1 {
- display: inline;
- font-size: 14pt;
- margin: 0;
-}
-#selected_site h2 {
- font-size: 12pt;
- margin: 0;
-}
-
-#events section h3 {
- font-size: medium;
- font-weight: normal;
-}
-
-/**
- * Software
-**/
-
-html.software #foundation {
- width: 25%;
-}
-html.software #software {
- width: 75%;
-}
-html.software #software article {
- clear: both;
-}
-html.software #software ul {
- list-style: none;
- margin: 1em;
- padding: 0;
-}
-html.software #software p {
- text-align: justify;
-}
-html.software #software .logo {
- float: left;
- margin: 25px;
-}
-html.software #software .sponsors {
- float: right;
-}
-html.software #software .release-info {
- margin-top: 3em;
-}
-html.software #software .release-info .version {
- font-weight: bold;
-}
-html.software .sponsors li.rastasoft {
- display: block;
- width: 7em;
- border-top: 1.25em solid #f00;
- background-color: #ff0;
- border-bottom: 1.25em solid #0f0;
- margin: 5px;
- padding: 3px;
- font-size: smaller;
- text-align: center;
-}
-html.software .sponsors li.rastasoft a {
- color: #000;
-}
-html.software .sponsors li.servus a {
- font-size: larger;
- color: #0f0;
-}
-html.software #foundation h3 {
- padding-left: 1em
-}
-html.software #foundation dl {
- font-size: smaller;
- margin: 0 1em;
-}
-html.software #foundation dl dt {
- font-weight: bold
-}
-html.software #foundation dl dd {
- margin: 1em 0.25em;
- text-align: justify;
-}
-
-img.left { float: left; margin-right: 5px }
-img.right { float: right; margin-left: 5px }
-
-/**
- * Culture
-**/
-
-html.culture #foundation { width: 30%; }
-html.culture #culture { width: 40%; }
-html.culture #events { width: 30%; }
-
-/**
- * Firefox fixes
-**/
-
-article { display: block } /* force article as blocks*/
-/* TODO: fix nav alignment */
-
-/**
- * Tabs
-**/
-
-ul.tabs {
- margin: 0;
- padding: 0;
- float: left;
- list-style: none;
- height: 24px; /*--Set height of tabs--*/
- border-bottom: 1px solid #dcb;
- border-left: 1px solid #dcb;
- width: 99%;
-}
-
-ul.tabs li {
- float: left;
- margin: 0;
- padding: 0;
- height: 23px; /*--Subtract 1px from the height of the unordered list--*/
- line-height: 23px; /*--Vertically aligns the text within the tab--*/
- border: 1px solid #dcb;
- border-left: none;
- margin-bottom: -1px; /*--Pull the list item down 1px--*/
- overflow: hidden;
- position: relative;
- background: #dcb;
-}
-
-ul.tabs li a {
- text-decoration: none;
- color: #000;
- display: block;
- font-size: 10px;
- padding: 0 20px;
- border: 1px solid #fed; /*--Gives the bevel look with a 1px white border inside the list item--*/
- outline: none;
-}
-
-ul.tabs li a:hover {
- background: #000; color: #840;
-}
-
-html ul.tabs li.active, html ul.tabs li.active a:hover {
- /*--Makes sure that the active tab does not listen to the hover properties--*/
- background: #fed;
- border-bottom: 1px solid #fed; /*--Makes the active tab look like it's connected with its content--*/
-}
-
-.tab_container {
- border: 1px solid #dcb;
- border-top: none;
- overflow: hidden;
- clear: both;
- float: left;
- width: 99%;
- background: #fed;
-}
-.tab_content {
- padding: 1em;
-}
-
-#player_controls {
- margin: 0;
- padding: 0;
- float: left;
- list-style: none;
- height: 14px; /*--Set height of tabs--*/
- width: 100%;
-}
-#player_controls li {
- float: left;
- margin: 0 0 0 5px;
- padding: 0;
- height: 14px; /*--Subtract 1px from the height of the unordered list--*/
- line-height: 14px; /*--Vertically aligns the text within the tab--*/
- border: 1px solid #dcb;
- border-left: none;
- overflow: hidden;
- position: relative;
-}
-#player_controls li { font-size: 13px; line-height: 14px; font-weight: bold; width:14px; height:14px; text-align: center }
-#player_controls li:hover { color: #840; }
-#player_controls #player_pause { font-size: 14px; line-height: -1px }
-#player_controls #player_play,
-#player_controls #player_stop { line-height: 12px }
-
-#player_progress {
- clear: both;
- display: block;
- font-family: monospace;
- font-size: 5px;
- height: 5px;
- width: 275px;
- background-color: #edc;
- padding: 0;
- line-height: 5px;
- border: 1px solid #dcb;
- top: 3px;
- left: 3px;
- right: 3px;
- position: relative;
-}
-#player_progress_load_bar {
- background-color: #987;
- color: #fed;
-}
-#player_progress_play_bar {
- background-color: #fed;
- color: #fed;
-}
-#player_volume_bar {
- display: block;
- width:100px;
- height:5px;
- background-color: #dcb;
- position:relative;
- top: -15px;
- left: 180px;
-}
-#player_volume_bar_value {
- display:block;
- background-color: #fed;
- border: 1px solid #dcb;
- height: 3px;
-}
-
-
-.tab_container h2 {
- font-size: 10pt;
- margin: 0;
- line-height: 10pt;
-}
-
-#playlist_list {
- clear: both;
- padding: 1px;
-}
-#playlist_list ul {
- list-style: none;
- padding: 0;
-}
-#playlist_list ul li {
- font-family: monospace;
- font-size: 10px;
- margin: 0;
- padding: 0;
-}
-
-#playlist_list ul li.playlist_current {
- background-color: #edc;
- font-weight: bold;
-}
-
-/**
- * Events
-**/
-
-html.events #foundation { width: 40%; margin-left: 10% }
-html.events #culture { width: 40%; margin-top: -2em; margin-right: 10% }
-html.events #events { width: 100%; clear: left; margin-top: 1em }
-
-html.events article { padding: 0 1em }
-html.events #culture #ascii_bulletin { padding: 0 2em; font-size: 12px }
-
-html.events section.list { text-align: left; }
-html.events section.list article { margin-top: 0.5em; text-align: left; }
-
-html.events #google_calendar { border: 0; text-align: center; }
-
-#syndicate {
- background: transparent url(/images/icons/feed_64x64.png) 0em 2em no-repeat;
- height: 96px;
-}
-#syndicate ul {
- list-style: none;
- margin: 0 0 0 64px;
- padding: 0;
-}
-#syndicate li {
- margin: 0 0 1em 0;
- padding: 0;
-}
-
-#dyne_news input[type=submit] {
- font-size: smaller;
- font-family: monospace;
- font-weight: bold;
-}
-
-/* Google Calendar CSS */
-#mothertable { background: #fed !important }
diff --git a/web/stylesheets/org-htmlize-src.css b/web/stylesheets/org-htmlize-src.css
deleted file mode 100644
index e22a3d2..0000000
--- a/web/stylesheets/org-htmlize-src.css
+++ /dev/null
@@ -1,1724 +0,0 @@
-.org-mode pre.src {
- color: #F8F8F8;
- background-color: #141414;
- }
- .org-better-fringes-bitmap {
- /* better-fringes-bitmap */
- color: #f0e68c;
- }
- .org-better-fringes-important-bitmap {
- /* better-fringes-important-bitmap */
- color: #ff0000;
- }
- .org-blue {
- /* blue */
- color: #0000ff;
- }
- .org-bold {
- /* bold */
- font-weight: bold;
- }
- .org-bold-italic {
- /* bold-italic */
- font-weight: bold;
- font-style: italic;
- }
- .org-bookmark-menu-heading {
- /* bookmark-menu-heading */
- color: #9B703F;
- }
- .org-border {
- /* border */
- background-color: #000000;
- }
- .org-border-glyph {
- }
- .org-buffer-menu-buffer {
- /* buffer-menu-buffer */
- font-weight: bold;
- }
- .org-buffers-tab {
- /* buffers-tab */
- color: #CACACA;
- background-color: #141414;
- }
- .org-builtin {
- /* font-lock-builtin-face */
- color: #CACACA;
- }
- .org-button {
- /* button */
- text-decoration: underline;
- }
- .org-c-nonbreakable-space {
- /* c-nonbreakable-space-face */
- color: #EE799F;
- background-color: #ff0000;
- }
- .org-calendar-today {
- /* calendar-today */
- text-decoration: underline;
- }
- .org-change-log-acknowledgement {
- /* change-log-acknowledgement */
- color: #5F5A60;
- }
- .org-change-log-conditionals {
- /* change-log-conditionals */
- color: #7587A6;
- }
- .org-change-log-date {
- /* change-log-date */
- color: #8F9D6A;
- }
- .org-change-log-email {
- /* change-log-email */
- color: #7587A6;
- }
- .org-change-log-file {
- /* change-log-file */
- color: #9B703F;
- }
- .org-change-log-function {
- /* change-log-function */
- color: #7587A6;
- }
- .org-change-log-list {
- /* change-log-list */
- color: #CDA869;
- }
- .org-change-log-name {
- /* change-log-name */
- color: #CF6A4C;
- }
- .org-comint-highlight-input {
- /* comint-highlight-input */
- font-weight: bold;
- }
- .org-comint-highlight-prompt {
- /* comint-highlight-prompt */
- color: #00ffff;
- }
- .org-comment {
- /* font-lock-comment-face */
- color: #5F5A60;
- }
- .org-comment-delimiter {
- /* font-lock-comment-delimiter-face */
- color: #5F5A60;
- }
- .org-compilation-column-number {
- /* compilation-column-number */
- color: #9B703F;
- }
- .org-compilation-error {
- /* compilation-error */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-compilation-info {
- /* compilation-info */
- color: #00ff00;
- font-weight: bold;
- }
- .org-compilation-line-number {
- /* compilation-line-number */
- color: #7587A6;
- }
- .org-compilation-warning {
- /* compilation-warning */
- color: #ffa500;
- font-weight: bold;
- }
- .org-completions-common-part {
- /* completions-common-part */
- color: #F8F8F8;
- background-color: #141414;
- }
- .org-completions-first-difference {
- /* completions-first-difference */
- font-weight: bold;
- }
- .org-constant {
- /* font-lock-constant-face */
- color: #CF6A4C;
- }
- .org-cursor {
- /* cursor */
- background-color: #A7A7A7;
- }
- .org-custom-button {
- /* custom-button-face */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-custom-button-1 {
- /* custom-button */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-custom-button-mouse {
- /* custom-button-mouse */
- color: #000000;
- background-color: #e5e5e5;
- }
- .org-custom-button-pressed {
- /* custom-button-pressed */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-custom-button-pressed-unraised {
- /* custom-button-pressed-unraised */
- color: #ee82ee;
- }
- .org-custom-button-unraised {
- }
- .org-custom-changed {
- /* custom-changed-face */
- color: #ffffff;
- background-color: #0000ff;
- }
- .org-custom-changed-1 {
- /* custom-changed */
- color: #ffffff;
- background-color: #0000ff;
- }
- .org-custom-comment {
- /* custom-comment */
- background-color: #696969;
- }
- .org-custom-comment-tag {
- /* custom-comment-tag */
- color: #cccccc;
- }
- .org-custom-documentation {
- }
- .org-custom-documentation-1 {
- }
- .org-custom-face-tag {
- /* custom-face-tag-face */
- color: #add8e6;
- font-weight: bold;
- }
- .org-custom-face-tag-1 {
- /* custom-face-tag */
- color: #add8e6;
- font-weight: bold;
- }
- .org-custom-group-tag {
- /* custom-group-tag-face */
- color: #add8e6;
- font-size: 120%;
- font-weight: bold;
- }
- .org-custom-group-tag-1 {
- /* custom-group-tag-1 */
- color: #ffc0cb;
- font-size: 120%;
- font-weight: bold;
- }
- .org-custom-group-tag-2 {
- /* custom-group-tag */
- color: #add8e6;
- font-size: 120%;
- font-weight: bold;
- }
- .org-custom-group-tag-face-1 {
- /* custom-group-tag-face-1 */
- color: #ffc0cb;
- font-size: 120%;
- font-weight: bold;
- }
- .org-custom-invalid {
- /* custom-invalid-face */
- color: #ffff00;
- background-color: #ff0000;
- }
- .org-custom-invalid-1 {
- /* custom-invalid */
- color: #ffff00;
- background-color: #ff0000;
- }
- .org-custom-link {
- /* custom-link */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-custom-modified {
- /* custom-modified-face */
- color: #ffffff;
- background-color: #0000ff;
- }
- .org-custom-modified-1 {
- /* custom-modified */
- color: #ffffff;
- background-color: #0000ff;
- }
- .org-custom-rogue {
- /* custom-rogue-face */
- color: #ffc0cb;
- background-color: #000000;
- }
- .org-custom-rogue-1 {
- /* custom-rogue */
- color: #ffc0cb;
- background-color: #000000;
- }
- .org-custom-saved {
- /* custom-saved-face */
- text-decoration: underline;
- }
- .org-custom-saved-1 {
- /* custom-saved */
- text-decoration: underline;
- }
- .org-custom-set {
- /* custom-set-face */
- color: #0000ff;
- background-color: #ffffff;
- }
- .org-custom-set-1 {
- /* custom-set */
- color: #0000ff;
- background-color: #ffffff;
- }
- .org-custom-state {
- /* custom-state-face */
- color: #32cd32;
- }
- .org-custom-state-1 {
- /* custom-state */
- color: #32cd32;
- }
- .org-custom-themed {
- /* custom-themed */
- color: #ffffff;
- background-color: #0000ff;
- }
- .org-custom-variable-button {
- /* custom-variable-button-face */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-custom-variable-button-1 {
- /* custom-variable-button */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-custom-variable-tag {
- /* custom-variable-tag-face */
- color: #add8e6;
- font-weight: bold;
- }
- .org-custom-variable-tag-1 {
- /* custom-variable-tag */
- color: #add8e6;
- font-weight: bold;
- }
- .org-custom-visibility {
- /* custom-visibility */
- color: #00ffff;
- font-size: 80%;
- text-decoration: underline;
- }
- .org-default {
- /* default */
- color: #F8F8F8;
- background-color: #141414;
- }
- .org-diary {
- /* diary */
- color: #ffff00;
- }
- .org-dired-directory {
- /* dired-directory */
- color: #9B703F;
- }
- .org-dired-flagged {
- /* dired-flagged */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-dired-header {
- /* dired-header */
- color: #9B703F;
- }
- .org-dired-ignored {
- /* dired-ignored */
- color: #b3b3b3;
- }
- .org-dired-mark {
- /* dired-mark */
- color: #CF6A4C;
- }
- .org-dired-marked {
- /* dired-marked */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-dired-perm-write {
- /* dired-perm-write */
- color: #5F5A60;
- }
- .org-dired-symlink {
- /* dired-symlink */
- color: #CDA869;
- }
- .org-dired-warning {
- /* dired-warning */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-doc {
- /* font-lock-doc-face */
- color: #8F9D6A;
- }
- .org-doc-string {
- /* font-lock-doc-string-face */
- color: #ff8c00;
- }
- .org-ediff-current-diff-a {
- /* ediff-current-diff-A */
- color: #b22222;
- background-color: #98fb98;
- }
- .org-ediff-current-diff-ancestor {
- /* ediff-current-diff-Ancestor */
- color: #000000;
- background-color: #d02090;
- }
- .org-ediff-current-diff-b {
- /* ediff-current-diff-B */
- color: #9932cc;
- background-color: #ffff00;
- }
- .org-ediff-current-diff-c {
- /* ediff-current-diff-C */
- color: #000080;
- background-color: #ffc0cb;
- }
- .org-ediff-even-diff-a {
- /* ediff-even-diff-A */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-ediff-even-diff-ancestor {
- /* ediff-even-diff-Ancestor */
- color: #ffffff;
- background-color: #bebebe;
- }
- .org-ediff-even-diff-b {
- /* ediff-even-diff-B */
- color: #ffffff;
- background-color: #bebebe;
- }
- .org-ediff-even-diff-c {
- /* ediff-even-diff-C */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-ediff-fine-diff-a {
- /* ediff-fine-diff-A */
- color: #000080;
- background-color: #87ceeb;
- }
- .org-ediff-fine-diff-ancestor {
- /* ediff-fine-diff-Ancestor */
- color: #000000;
- background-color: #00ff00;
- }
- .org-ediff-fine-diff-b {
- /* ediff-fine-diff-B */
- color: #000000;
- background-color: #00ffff;
- }
- .org-ediff-fine-diff-c {
- /* ediff-fine-diff-C */
- color: #000000;
- background-color: #40e0d0;
- }
- .org-ediff-odd-diff-a {
- /* ediff-odd-diff-A */
- color: #ffffff;
- background-color: #bebebe;
- }
- .org-ediff-odd-diff-ancestor {
- /* ediff-odd-diff-Ancestor */
- color: #00cdcd;
- background-color: #666666;
- }
- .org-ediff-odd-diff-b {
- /* ediff-odd-diff-B */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-ediff-odd-diff-c {
- /* ediff-odd-diff-C */
- color: #ffffff;
- background-color: #bebebe;
- }
- .org-escape-glyph {
- /* escape-glyph */
- color: #00ffff;
- }
- .org-file-name-shadow {
- /* file-name-shadow */
- color: #b3b3b3;
- }
- .org-fixed-pitch {
- }
- .org-fl-comment {
- /* fl-comment-face */
- color: #ffc0cb;
- }
- .org-fl-doc-string {
- /* fl-doc-string-face */
- color: #a020f0;
- }
- .org-fl-function-name {
- /* fl-function-name-face */
- color: #ff0000;
- }
- .org-fl-keyword {
- /* fl-keyword-face */
- color: #00ffff;
- }
- .org-fl-string {
- /* fl-string-face */
- color: #00ff00;
- }
- .org-fl-type {
- /* fl-type-face */
- color: #ffff00;
- }
- .org-flymake-errline {
- /* flymake-errline */
- background-color: #8b1a1a;
- }
- .org-flymake-warnline {
- /* flymake-warnline */
- background-color: #00008b;
- }
- .org-flyspell-duplicate {
- /* flyspell-duplicate */
- color: #cdad00;
- font-weight: bold;
- text-decoration: underline;
- }
- .org-flyspell-incorrect {
- /* flyspell-incorrect */
- color: #ff4500;
- font-weight: bold;
- text-decoration: underline;
- }
- .org-fringe {
- /* fringe */
- background-color: #1a1a1a;
- }
- .org-function-name {
- /* font-lock-function-name-face */
- color: #9B703F;
- }
- .org-gnus-cite-attribution {
- /* gnus-cite-attribution-face */
- font-style: italic;
- }
- .org-gnus-cite-face-1 {
- /* gnus-cite-face-1 */
- color: #00bfff;
- font-weight: bold;
- }
- .org-gnus-cite-face-10 {
- /* gnus-cite-face-10 */
- color: #9370db;
- }
- .org-gnus-cite-face-11 {
- /* gnus-cite-face-11 */
- color: #40e0d0;
- }
- .org-gnus-cite-face-2 {
- /* gnus-cite-face-2 */
- color: #00ffff;
- font-weight: bold;
- }
- .org-gnus-cite-face-3 {
- /* gnus-cite-face-3 */
- color: #ffd700;
- font-weight: bold;
- }
- .org-gnus-cite-face-4 {
- /* gnus-cite-face-4 */
- color: #ffb6c1;
- }
- .org-gnus-cite-face-5 {
- /* gnus-cite-face-5 */
- color: #98fb98;
- }
- .org-gnus-cite-face-6 {
- /* gnus-cite-face-6 */
- color: #d2691e;
- font-weight: bold;
- }
- .org-gnus-cite-face-7 {
- /* gnus-cite-face-7 */
- color: #ffa500;
- }
- .org-gnus-cite-face-8 {
- /* gnus-cite-face-8 */
- color: #ff00ff;
- }
- .org-gnus-cite-face-9 {
- /* gnus-cite-face-9 */
- color: #ee82ee;
- }
- .org-gnus-emphasis-bold {
- /* gnus-emphasis-bold */
- font-weight: bold;
- }
- .org-gnus-emphasis-bold-italic {
- /* gnus-emphasis-bold-italic */
- font-weight: bold;
- font-style: italic;
- }
- .org-gnus-emphasis-highlight-words {
- /* gnus-emphasis-highlight-words */
- color: #ffff00;
- background-color: #000000;
- }
- .org-gnus-emphasis-italic {
- /* gnus-emphasis-italic */
- font-style: italic;
- }
- .org-gnus-emphasis-underline {
- /* gnus-emphasis-underline */
- text-decoration: underline;
- }
- .org-gnus-emphasis-underline-bold {
- /* gnus-emphasis-underline-bold */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-gnus-emphasis-underline-bold-italic {
- /* gnus-emphasis-underline-bold-italic */
- font-weight: bold;
- font-style: italic;
- text-decoration: underline;
- }
- .org-gnus-emphasis-underline-italic {
- /* gnus-emphasis-underline-italic */
- font-style: italic;
- text-decoration: underline;
- }
- .org-gnus-group-mail-1 {
- /* gnus-group-mail-1 */
- color: #7fffd4;
- font-weight: bold;
- }
- .org-gnus-group-mail-1-empty {
- /* gnus-group-mail-1-empty */
- color: #7fffd4;
- }
- .org-gnus-group-mail-2 {
- /* gnus-group-mail-2 */
- color: #76eec6;
- font-weight: bold;
- }
- .org-gnus-group-mail-2-empty {
- /* gnus-group-mail-2-empty */
- color: #76eec6;
- }
- .org-gnus-group-mail-3 {
- /* gnus-group-mail-3 */
- color: #66cdaa;
- font-weight: bold;
- }
- .org-gnus-group-mail-3-empty {
- /* gnus-group-mail-3-empty */
- color: #66cdaa;
- }
- .org-gnus-group-mail-low {
- /* gnus-group-mail-low */
- color: #458b74;
- font-weight: bold;
- }
- .org-gnus-group-mail-low-empty {
- /* gnus-group-mail-low-empty */
- color: #458b74;
- }
- .org-gnus-group-news-1 {
- /* gnus-group-news-1 */
- color: #afeeee;
- font-weight: bold;
- }
- .org-gnus-group-news-1-empty {
- /* gnus-group-news-1-empty */
- color: #afeeee;
- }
- .org-gnus-group-news-2 {
- /* gnus-group-news-2 */
- color: #40e0d0;
- font-weight: bold;
- }
- .org-gnus-group-news-2-empty {
- /* gnus-group-news-2-empty */
- color: #40e0d0;
- }
- .org-gnus-group-news-3 {
- /* gnus-group-news-3 */
- font-weight: bold;
- }
- .org-gnus-group-news-3-empty {
- }
- .org-gnus-group-news-4 {
- /* gnus-group-news-4 */
- font-weight: bold;
- }
- .org-gnus-group-news-4-empty {
- }
- .org-gnus-group-news-5 {
- /* gnus-group-news-5 */
- font-weight: bold;
- }
- .org-gnus-group-news-5-empty {
- }
- .org-gnus-group-news-6 {
- /* gnus-group-news-6 */
- font-weight: bold;
- }
- .org-gnus-group-news-6-empty {
- }
- .org-gnus-group-news-low {
- /* gnus-group-news-low */
- color: #00ced1;
- font-weight: bold;
- }
- .org-gnus-group-news-low-empty {
- /* gnus-group-news-low-empty */
- color: #00ced1;
- }
- .org-gnus-header-content {
- /* gnus-header-content-face */
- color: #228b22;
- font-style: italic;
- }
- .org-gnus-header-from {
- /* gnus-header-from-face */
- color: #00ff7f;
- font-weight: bold;
- }
- .org-gnus-header-name {
- /* gnus-header-name-face */
- color: #00bfff;
- }
- .org-gnus-header-newsgroups {
- /* gnus-header-newsgroups-face */
- color: #a020f0;
- font-weight: bold;
- font-style: italic;
- }
- .org-gnus-header-subject {
- /* gnus-header-subject-face */
- color: #ffa500;
- font-weight: bold;
- }
- .org-gnus-signature {
- /* gnus-signature-face */
- color: #f0e68c;
- font-weight: bold;
- }
- .org-gnus-splash {
- /* gnus-splash */
- color: #a52a2a;
- }
- .org-gnus-summary-cancelled {
- /* gnus-summary-cancelled */
- color: #ffff00;
- background-color: #000000;
- }
- .org-gnus-summary-high-ancient {
- /* gnus-summary-high-ancient */
- color: #87ceeb;
- font-weight: bold;
- }
- .org-gnus-summary-high-read {
- /* gnus-summary-high-read */
- color: #98fb98;
- font-weight: bold;
- }
- .org-gnus-summary-high-ticked {
- /* gnus-summary-high-ticked */
- color: #ffc0cb;
- font-weight: bold;
- }
- .org-gnus-summary-high-undownloaded {
- /* gnus-summary-high-undownloaded */
- color: #d3d3d3;
- font-weight: bold;
- }
- .org-gnus-summary-high-unread {
- /* gnus-summary-high-unread */
- font-weight: bold;
- }
- .org-gnus-summary-low-ancient {
- /* gnus-summary-low-ancient */
- color: #87ceeb;
- font-style: italic;
- }
- .org-gnus-summary-low-read {
- /* gnus-summary-low-read */
- color: #98fb98;
- font-style: italic;
- }
- .org-gnus-summary-low-ticked {
- /* gnus-summary-low-ticked */
- color: #ffc0cb;
- font-style: italic;
- }
- .org-gnus-summary-low-undownloaded {
- /* gnus-summary-low-undownloaded */
- color: #d3d3d3;
- font-style: italic;
- }
- .org-gnus-summary-low-unread {
- /* gnus-summary-low-unread */
- font-style: italic;
- }
- .org-gnus-summary-normal-ancient {
- /* gnus-summary-normal-ancient */
- color: #87ceeb;
- }
- .org-gnus-summary-normal-read {
- /* gnus-summary-normal-read */
- color: #98fb98;
- }
- .org-gnus-summary-normal-ticked {
- /* gnus-summary-normal-ticked */
- color: #ffc0cb;
- }
- .org-gnus-summary-normal-undownloaded {
- /* gnus-summary-normal-undownloaded */
- color: #d3d3d3;
- }
- .org-gnus-summary-normal-unread {
- }
- .org-gnus-summary-selected {
- /* gnus-summary-selected */
- text-decoration: underline;
- }
- .org-gui-element {
- /* gui-element */
- color: #000000;
- background-color: #D4D0C8;
- }
- .org-header-line {
- /* header-line */
- color: #e5e5e5;
- background-color: #333333;
- }
- .org-help-argument-name {
- }
- .org-hi-mumamo-black-b {
- /* hi-mumamo-black-b */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-hi-mumamo-blue {
- /* hi-mumamo-blue */
- text-decoration: underline;
- }
- .org-hi-mumamo-blue-b {
- /* hi-mumamo-blue-b */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-hi-mumamo-green {
- /* hi-mumamo-green */
- text-decoration: underline;
- }
- .org-hi-mumamo-green-b {
- /* hi-mumamo-green-b */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-hi-mumamo-pink {
- /* hi-mumamo-pink */
- text-decoration: underline;
- }
- .org-hi-mumamo-red-b {
- /* hi-mumamo-red-b */
- font-weight: bold;
- text-decoration: underline;
- }
- .org-hi-mumamo-yellow {
- /* hi-mumamo-yellow */
- text-decoration: underline;
- }
- .org-highlight {
- /* highlight */
- background-color: #111111;
- }
- .org-highline {
- /* highline-face */
- background-color: #2e8b57;
- }
- .org-holiday {
- /* holiday */
- background-color: #8b4513;
- }
- .org-ido-first-match {
- /* ido-first-match */
- color: #8F9D6A;
- }
- .org-ido-incomplete-regexp {
- /* ido-incomplete-regexp */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-ido-indicator {
- /* ido-indicator */
- color: #ffff00;
- background-color: #ff0000;
- }
- .org-ido-only-match {
- /* ido-only-match */
- color: #8F9D6A;
- }
- .org-ido-subdir {
- /* ido-subdir */
- color: #CF6A4C;
- }
- .org-info-header-node {
- /* info-header-node */
- color: #ffffff;
- font-weight: bold;
- font-style: italic;
- }
- .org-info-header-xref {
- /* info-header-xref */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-info-menu-header {
- /* info-menu-header */
- font-weight: bold;
- }
- .org-info-menu-star {
- /* info-menu-star */
- color: #ff0000;
- }
- .org-info-node {
- /* info-node */
- color: #ffffff;
- font-weight: bold;
- font-style: italic;
- }
- .org-info-title-1 {
- /* info-title-1 */
- font-size: 172%;
- font-weight: bold;
- }
- .org-info-title-2 {
- /* info-title-2 */
- font-size: 144%;
- font-weight: bold;
- }
- .org-info-title-3 {
- /* info-title-3 */
- font-size: 120%;
- font-weight: bold;
- }
- .org-info-title-4 {
- /* info-title-4 */
- font-weight: bold;
- }
- .org-info-xref {
- /* info-xref */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-isearch {
- /* isearch */
- color: #8b2323;
- background-color: #0000ff;
- }
- .org-isearch-fail {
- /* isearch-fail */
- background-color: #8b0000;
- }
- .org-iswitchb-current-match {
- /* iswitchb-current-match */
- color: #9B703F;
- }
- .org-iswitchb-invalid-regexp {
- /* iswitchb-invalid-regexp */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-iswitchb-single-match {
- /* iswitchb-single-match */
- color: #5F5A60;
- }
- .org-iswitchb-virtual-matches {
- /* iswitchb-virtual-matches */
- color: #CACACA;
- }
- .org-italic {
- /* italic */
- font-style: italic;
- text-decoration: underline;
- }
- .org-keyword {
- /* font-lock-keyword-face */
- color: #CDA869;
- }
- .org-lazy-highlight {
- /* lazy-highlight */
- background-color: #668b8b;
- }
- .org-left-margin {
- }
- .org-link {
- /* link */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-link-visited {
- /* link-visited */
- color: #ee82ee;
- text-decoration: underline;
- }
- .org-match {
- /* match */
- background-color: #3a5fcd;
- }
- .org-menu {
- }
- .org-message-cited-text {
- /* message-cited-text */
- color: #ff0000;
- font-weight: bold;
- }
- .org-message-header-cc {
- /* message-header-cc */
- color: #008b00;
- font-weight: bold;
- }
- .org-message-header-name {
- /* message-header-name */
- color: #ffa500;
- font-weight: bold;
- }
- .org-message-header-newsgroups {
- /* message-header-newsgroups */
- color: #ee82ee;
- font-weight: bold;
- }
- .org-message-header-other {
- /* message-header-other */
- color: #d2691e;
- font-weight: bold;
- }
- .org-message-header-subject {
- /* message-header-subject */
- color: #ffff00;
- font-weight: bold;
- }
- .org-message-header-to {
- /* message-header-to */
- color: #00ffff;
- font-weight: bold;
- }
- .org-message-header-xheader {
- /* message-header-xheader */
- color: #add8e6;
- font-weight: bold;
- }
- .org-message-mml {
- /* message-mml */
- background-color: #00cd00;
- font-weight: bold;
- }
- .org-message-separator {
- /* message-separator */
- color: #0000cd;
- }
- .org-minibuffer-prompt {
- /* minibuffer-prompt */
- color: #5F5A60;
- }
- .org-mlinks-link {
- /* mlinks-link */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-mode-line {
- /* mode-line */
- color: #000000;
- background-color: #bfbfbf;
- }
- .org-mode-line-buffer-id {
- /* mode-line-buffer-id */
- color: #000000;
- background-color: #ffffff;
- }
- .org-mode-line-emphasis {
- /* mode-line-emphasis */
- font-weight: bold;
- }
- .org-mode-line-highlight {
- }
- .org-mode-line-inactive {
- /* mode-line-inactive */
- color: #cccccc;
- background-color: #4d4d4d;
- }
- .org-modeline-mousable {
- /* modeline-mousable */
- color: #000000;
- background-color: #ffffff;
- }
- .org-modeline-mousable-minor-mode {
- /* modeline-mousable-minor-mode */
- color: #000000;
- background-color: #ffffff;
- }
- .org-mouse {
- /* mouse */
- background-color: #ff8247;
- }
- .org-mumamo-background-chunk-major {
- /* mumamo-background-chunk-major */
- background-color: #191970;
- }
- .org-mumamo-background-chunk-submode {
- /* mumamo-background-chunk-submode */
- background-color: #222222;
- }
- .org-mumamo-background-chunk-submode1 {
- /* mumamo-background-chunk-submode1 */
- background-color: #006400;
- }
- .org-mumamo-background-chunk-submode2 {
- /* mumamo-background-chunk-submode2 */
- background-color: #006400;
- }
- .org-mumamo-background-chunk-submode3 {
- /* mumamo-background-chunk-submode3 */
- background-color: #006400;
- }
- .org-mumamo-background-chunk-submode4 {
- /* mumamo-background-chunk-submode4 */
- background-color: #006400;
- }
- .org-mumamo-border-face-in {
- /* mumamo-border-face-in */
- color: #7fffd4;
- font-weight: bold;
- font-style: italic;
- text-decoration: underline;
- }
- .org-mumamo-border-face-out {
- /* mumamo-border-face-out */
- color: #7fffd4;
- font-weight: bold;
- font-style: italic;
- }
- .org-negation-char {
- }
- .org-next-error {
- /* next-error */
- background-color: #27292A;
- }
- .org-nobreak-space {
- /* nobreak-space */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-nxml-attribute-colon {
- }
- .org-nxml-attribute-local-name {
- /* nxml-attribute-local-name */
- color: #7587A6;
- }
- .org-nxml-attribute-prefix {
- /* nxml-attribute-prefix */
- color: #CACACA;
- }
- .org-nxml-attribute-value {
- /* nxml-attribute-value */
- color: #8F9D6A;
- }
- .org-nxml-attribute-value-delimiter {
- /* nxml-attribute-value-delimiter */
- color: #8F9D6A;
- }
- .org-nxml-cdata-section-cdata {
- /* nxml-cdata-section-CDATA */
- color: #CACACA;
- }
- .org-nxml-cdata-section-content {
- }
- .org-nxml-cdata-section-delimiter {
- }
- .org-nxml-char-ref-delimiter {
- /* nxml-char-ref-delimiter */
- color: #CF6A4C;
- }
- .org-nxml-char-ref-number {
- /* nxml-char-ref-number */
- color: #CF6A4C;
- }
- .org-nxml-comment-content {
- /* nxml-comment-content */
- color: #5F5A60;
- }
- .org-nxml-comment-delimiter {
- /* nxml-comment-delimiter */
- color: #5F5A60;
- }
- .org-nxml-delimited-data {
- /* nxml-delimited-data */
- color: #8F9D6A;
- }
- .org-nxml-delimiter {
- }
- .org-nxml-element-colon {
- }
- .org-nxml-element-local-name {
- /* nxml-element-local-name */
- color: #9B703F;
- }
- .org-nxml-element-prefix {
- /* nxml-element-prefix */
- color: #CACACA;
- }
- .org-nxml-entity-ref-delimiter {
- /* nxml-entity-ref-delimiter */
- color: #CF6A4C;
- }
- .org-nxml-entity-ref-name {
- /* nxml-entity-ref-name */
- color: #CF6A4C;
- }
- .org-nxml-glyph {
- /* nxml-glyph */
- color: #000000;
- background-color: #d3d3d3;
- }
- .org-nxml-hash {
- /* nxml-hash */
- color: #CACACA;
- }
- .org-nxml-heading {
- /* nxml-heading */
- font-weight: bold;
- }
- .org-nxml-markup-declaration-delimiter {
- }
- .org-nxml-name {
- /* nxml-name */
- color: #CACACA;
- }
- .org-nxml-namespace-attribute-colon {
- }
- .org-nxml-namespace-attribute-prefix {
- /* nxml-namespace-attribute-prefix */
- color: #7587A6;
- }
- .org-nxml-namespace-attribute-value {
- /* nxml-namespace-attribute-value */
- color: #8F9D6A;
- }
- .org-nxml-namespace-attribute-value-delimiter {
- /* nxml-namespace-attribute-value-delimiter */
- color: #8F9D6A;
- }
- .org-nxml-namespace-attribute-xmlns {
- /* nxml-namespace-attribute-xmlns */
- color: #CACACA;
- }
- .org-nxml-outline-active-indicator {
- /* nxml-outline-active-indicator */
- color: #F8F8F8;
- background-color: #141414;
- }
- .org-nxml-outline-ellipsis {
- /* nxml-outline-ellipsis */
- color: #F8F8F8;
- background-color: #141414;
- font-weight: bold;
- }
- .org-nxml-outline-indicator {
- /* nxml-outline-indicator */
- color: #F8F8F8;
- background-color: #141414;
- }
- .org-nxml-processing-instruction-content {
- /* nxml-processing-instruction-content */
- color: #8F9D6A;
- }
- .org-nxml-processing-instruction-delimiter {
- }
- .org-nxml-processing-instruction-target {
- /* nxml-processing-instruction-target */
- color: #CDA869;
- }
- .org-nxml-prolog-keyword {
- /* nxml-prolog-keyword */
- color: #CDA869;
- }
- .org-nxml-prolog-literal-content {
- /* nxml-prolog-literal-content */
- color: #8F9D6A;
- }
- .org-nxml-prolog-literal-delimiter {
- /* nxml-prolog-literal-delimiter */
- color: #8F9D6A;
- }
- .org-nxml-ref {
- /* nxml-ref */
- color: #CF6A4C;
- }
- .org-nxml-tag-delimiter {
- }
- .org-nxml-tag-slash {
- }
- .org-nxml-text {
- }
- .org-org-agenda-column-dateline {
- /* org-agenda-column-dateline */
- background-color: #4d4d4d;
- }
- .org-org-agenda-date {
- }
- .org-org-agenda-date-today {
- /* org-agenda-date-today */
- font-weight: bold;
- font-style: italic;
- }
- .org-org-agenda-date-weekend {
- /* org-agenda-date-weekend */
- font-weight: bold;
- }
- .org-org-agenda-dimmed-todo {
- /* org-agenda-dimmed-todo-face */
- color: #7f7f7f;
- }
- .org-org-agenda-done {
- /* org-agenda-done */
- color: #98fb98;
- }
- .org-org-agenda-restriction-lock {
- /* org-agenda-restriction-lock */
- background-color: #4a708b;
- }
- .org-org-agenda-structure {
- /* org-agenda-structure */
- color: #87cefa;
- }
- .org-org-archived {
- /* org-archived */
- color: #b3b3b3;
- }
- .org-org-block {
- /* org-block */
- color: #b3b3b3;
- }
- .org-org-checkbox {
- /* org-checkbox */
- font-weight: bold;
- }
- .org-org-checkbox-statistics-done {
- }
- .org-org-checkbox-statistics-todo {
- }
- .org-org-clock-overlay {
- /* org-clock-overlay */
- background-color: #4a708b;
- }
- .org-org-code {
- /* org-code */
- color: #b3b3b3;
- }
- .org-org-column {
- /* org-column */
- background-color: #4d4d4d;
- }
- .org-org-column-title {
- /* org-column-title */
- background-color: #4d4d4d;
- font-weight: bold;
- text-decoration: underline;
- }
- .org-org-date {
- /* org-date */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-org-done {
- /* org-done */
- color: #98fb98;
- font-weight: bold;
- }
- .org-org-drawer {
- /* org-drawer */
- color: #87cefa;
- }
- .org-org-ellipsis {
- /* org-ellipsis */
- color: #eedd82;
- text-decoration: underline;
- }
- .org-org-eval {
- /* org-eval */
- color: #999999;
- }
- .org-org-footnote {
- /* org-footnote */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-org-formula {
- /* org-formula */
- color: #ff7f24;
- }
- .org-org-headline-done {
- /* org-headline-done */
- color: #ffa07a;
- }
- .org-org-hide {
- /* org-hide */
- color: #000000;
- }
- .org-org-latex-and-export-specials {
- /* org-latex-and-export-specials */
- color: #deb887;
- }
- .org-org-level-1 {
- /* org-level-1 */
- color: #9B703F;
- }
- .org-org-level-2 {
- /* org-level-2 */
- color: #7587A6;
- }
- .org-org-level-3 {
- /* org-level-3 */
- color: #CDA869;
- }
- .org-org-level-4 {
- /* org-level-4 */
- color: #5F5A60;
- }
- .org-org-level-5 {
- /* org-level-5 */
- color: #9B703F;
- }
- .org-org-level-6 {
- /* org-level-6 */
- color: #CF6A4C;
- }
- .org-org-level-7 {
- /* org-level-7 */
- color: #CACACA;
- }
- .org-org-level-8 {
- /* org-level-8 */
- color: #8F9D6A;
- }
- .org-org-link {
- /* org-link */
- color: #00ffff;
- text-decoration: underline;
- }
- .org-org-meta-line {
- /* org-meta-line */
- color: #5F5A60;
- }
- .org-org-mode-line-clock {
- }
- .org-org-mtags {
- /* org-mtags */
- color: #b3b3b3;
- }
- .org-org-property-value {
- }
- .org-org-scheduled {
- /* org-scheduled */
- color: #98fb98;
- }
- .org-org-scheduled-previously {
- /* org-scheduled-previously */
- color: #ff7f24;
- }
- .org-org-scheduled-today {
- /* org-scheduled-today */
- color: #98fb98;
- }
- .org-org-sexp-date {
- /* org-sexp-date */
- color: #00ffff;
- }
- .org-org-special-keyword {
- /* org-special-keyword */
- color: #ffa07a;
- }
- .org-org-table {
- /* org-table */
- color: #87cefa;
- }
- .org-org-tag {
- /* org-tag */
- font-weight: bold;
- }
- .org-org-target {
- /* org-target */
- text-decoration: underline;
- }
- .org-org-time-grid {
- /* org-time-grid */
- color: #eedd82;
- }
- .org-org-todo {
- /* org-todo */
- color: #ffc0cb;
- font-weight: bold;
- }
- .org-org-upcoming-deadline {
- /* org-upcoming-deadline */
- color: #ff7f24;
- }
- .org-org-verbatim {
- /* org-verbatim */
- color: #b3b3b3;
- }
- .org-org-warning {
- /* org-warning */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-orgpan-spaceline {
- /* orgpan-spaceline */
- font-size: 20%;
- }
- .org-outline-1 {
- /* outline-1 */
- color: #9B703F;
- }
- .org-outline-2 {
- /* outline-2 */
- color: #7587A6;
- }
- .org-outline-3 {
- /* outline-3 */
- color: #CDA869;
- }
- .org-outline-4 {
- /* outline-4 */
- color: #5F5A60;
- }
- .org-outline-5 {
- /* outline-5 */
- color: #9B703F;
- }
- .org-outline-6 {
- /* outline-6 */
- color: #CF6A4C;
- }
- .org-outline-7 {
- /* outline-7 */
- color: #CACACA;
- }
- .org-outline-8 {
- /* outline-8 */
- color: #8F9D6A;
- }
- .org-preprocessor {
- /* font-lock-preprocessor-face */
- color: #7fffd4;
- }
- .org-primary-selection {
- /* primary-selection */
- background-color: #0000ff;
- }
- .org-query-replace {
- /* query-replace */
- color: #8b2323;
- background-color: #0000ff;
- }
- .org-reference {
- /* font-lock-reference-face */
- color: #6a5acd;
- }
- .org-regexp-grouping-backslash {
- /* font-lock-regexp-grouping-backslash */
- color: #E9C062;
- }
- .org-regexp-grouping-construct {
- /* font-lock-regexp-grouping-construct */
- color: #ff0000;
- }
- .org-region {
- /* region */
- background-color: #27292A;
- }
- .org-rng-error {
- /* rng-error */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-rngalt-validation-header-bottom {
- /* rngalt-validation-header-bottom */
- color: #ffffff;
- background-color: #87cefa;
- }
- .org-rngalt-validation-header-top {
- /* rngalt-validation-header-top */
- color: #87cefa;
- background-color: #ffffff;
- }
- .org-scroll-bar {
- }
- .org-secondary-selection {
- /* secondary-selection */
- background-color: #483d8b;
- }
- .org-sgml-namespace {
- /* sgml-namespace */
- color: #CACACA;
- }
- .org-sh-escaped-newline {
- /* sh-escaped-newline */
- color: #8F9D6A;
- }
- .org-sh-heredoc {
- /* sh-heredoc */
- color: #ffff00;
- font-weight: bold;
- }
- .org-sh-quoted-exec {
- /* sh-quoted-exec */
- color: #fa8072;
- }
- .org-shadow {
- /* shadow */
- color: #b3b3b3;
- }
- .org-speedbar-button {
- /* speedbar-button-face */
- color: #00cd00;
- }
- .org-speedbar-directory {
- /* speedbar-directory-face */
- color: #add8e6;
- }
- .org-speedbar-file {
- /* speedbar-file-face */
- color: #00ffff;
- }
- .org-speedbar-highlight {
- /* speedbar-highlight-face */
- background-color: #2e8b57;
- }
- .org-speedbar-selected {
- /* speedbar-selected-face */
- color: #ff0000;
- text-decoration: underline;
- }
- .org-speedbar-separator {
- /* speedbar-separator-face */
- color: #ffffff;
- background-color: #0000ff;
- text-decoration: overline;
- }
- .org-speedbar-tag {
- /* speedbar-tag-face */
- color: #ffff00;
- }
- .org-string {
- /* font-lock-string-face */
- color: #8F9D6A;
- }
- .org-text-cursor {
- /* text-cursor */
- color: #000000;
- background-color: #ffff00;
- }
- .org-tool-bar {
- }
- .org-tooltip {
- /* tooltip */
- color: #000000;
- background-color: #ffffe0;
- }
- .org-trailing-whitespace {
- /* trailing-whitespace */
- background-color: #ff0000;
- }
- .org-type {
- /* font-lock-type-face */
- color: #9B703F;
- }
- .org-underline {
- }
- .org-variable-name {
- /* font-lock-variable-name-face */
- color: #7587A6;
- }
- .org-variable-pitch {
- }
- .org-vertical-border {
- }
- .org-warning {
- /* font-lock-warning-face */
- color: #ff0000;
- background-color: #EE799F;
- font-weight: bold;
- }
- .org-widget-button {
- /* widget-button */
- font-weight: bold;
- }
- .org-widget-button-pressed {
- /* widget-button-pressed */
- color: #ff0000;
- }
- .org-widget-documentation {
- /* widget-documentation */
- color: #32cd32;
- }
- .org-widget-field {
- /* widget-field */
- background-color: #696969;
- }
- .org-widget-inactive {
- /* widget-inactive */
- color: #d3d3d3;
- }
- .org-widget-single-line-field {
- /* widget-single-line-field */
- background-color: #696969;
- }
- .org-zmacs-region {
- /* zmacs-region */
- color: #0000ff;
- background-color: #fffafa;
- }
-
- a {
- color: inherit;
- background-color: inherit;
- font: inherit;
- text-decoration: inherit;
- }
- a:hover {
- text-decoration: underline;
- }
diff --git a/web/stylesheets/org-mode.css b/web/stylesheets/org-mode.css
deleted file mode 100644
index 38a0ddd..0000000
--- a/web/stylesheets/org-mode.css
+++ /dev/null
@@ -1,109 +0,0 @@
-
-.org-mode #logo {
- float: right;
- clear: right;
- margin-right: 2px;
- margin-top: -8em;
- display: compact;
- }
-
-.org-mode header hgroup h1 {
- background: #ffeedd
- url(http://dyne.org/pics/dynebggrl2r.png) repeat-y;
- color: #222222;
- overflow: hidden; /* don't crowd the menu */
- border: 0px;
- border-bottom: 2px dotted #EECC99;
- font-style: italic;
- font-size: 28px;
- padding: 0.5em;
- margin-bottom: 0;
- margin-left: 0;
- white-space: nowrap;
- }
-
-.org-mode .todo { color: red; }
-.org-mode .done { color: green; }
-.org-mode .tag { background-color: #add8e6; font-weight:normal }
-.org-mode .target { }
-.org-mode .timestamp { color: #bebebe; }
-.org-mode .timestamp-kwd { color: #5f9ea0; }
-.org-mode p.verse { margin-left: 3% }
-.org-mode pre {
- border: 1pt solid #AEBDCC;
- background-color: #F3F5F7;
- padding: 5pt;
- font-family: monospace, courier;
- font-size: 90%
- overflow: auto;
- width: 90%
- }
-.org-mode table { border-collapse: collapse; }
-.org-mode td, .org-mode th { vertical-align: top; }
-.org-mode dt { font-weight: bold; }
-.org-mode div.figure { padding: 0.5em; }
-.org-mode div.figure p { text-align: center; }
-.org-mode .linenr { font-size:smaller }
-.org-mode .code-highlighted {background-color:#ffff00;}
-.org-mode .org-info-js_info-navigation { border-style:none; }
-.org-mode #org-info-js_console-label { font-size:10px; font-weight:bold;
- white-space:nowrap; }
-.org-mode .org-info-js_search-highlight {background-color:#ffff00; color:#000000;
- font-weight:bold; }
-
-.org-mode .outline-1 { text-align: center; }
-.org-mode .outline-2 { margin-left: 10em; margin-right: 1em; }
-.org-mode .outline-3 { margin-left: 1em; }
-
-.org-mode #postamble { opacity: 0.66;
- font-size: 0.66em;
- text-align: right;
- display: none;
- float: right;
- clear: right;
- width: 25em;
- margin-right: 1.5em;
- }
-
-
-.org-mode #menu {
- position: fixed;
- }
-
-
-.org-mode #document-types {
- width: 15em;
- float: left;
- clear: left;
- margin-left: 0.5em;
- margin-right: 3em;
- display: compact;
- font-size: 0.88em;
- text-align: left;
- }
-
-/* TOC on top of sidebar */
-.org-mode #table-of-contents {
- width: 15em;
- float: left;
- clear: left;
- margin-left: 0.5em;
- margin-right: 3em;
- margin-bottom: 0.5em;
- display: compact;
- font-size: 0.88em;
- }
-
-.org-mode #table-of-contents h2 { font-size: 1em; }
-.org-mode #table-of-contents ul { list-style: none; margin: 0em 0em; padding: 0; }
-.org-mode #table-of-contents li { margin: 0; padding: 0 0 0 0.5em; }
-
-/* first section is sidebar
-.org-mode #outline-container-1 {
- width: 15em;
- float: left;
- clear: left;
- margin-right: 3em
- display: compact;
- font-size: 0.78em;
- } */ \ No newline at end of file
diff --git a/web/templates/_footer.tpl b/web/templates/_footer.tpl
deleted file mode 100644
index ad57fe4..0000000
--- a/web/templates/_footer.tpl
+++ /dev/null
@@ -1,55 +0,0 @@
- <footer>
- <hr />
-
- {if DYNE_DEBUG_RENDERING_TIME}
- <section id="dyne_debug">
- <p>Page Rendering Time: {$timer->stop()}ms.</p>
- </section>
- {/if}
-
- <section id="disclaimer">
- <h2>dyne.org</h2>
- <p>
- Copyleft 2000 - 2010 dyne.org foundation and respective authors.
- Verbatim copying and distribution is permitted in any medium,
- provided this notice is preserved.
- <p><a href="contact">Send your enquiries &amp; questions to dyne's hackers</a>.</p>
- </p>
- </section>
-
- <section id="recognition">
- <h2>Recognition</h2>
- <ul>
- <li><a href="http://www.gnu.org/"><img src="http://dyne.org/images/badges/gnu_75x65.png" alt="Dyne:bolic is listed on the GNU Free Distro page"/></a></li>
- <li><a href="http://www.unesco.org/cgi-bin/webworld/portal_freesoftware/cgi/page.cgi?g=Information/Initiatives/index.shtml&d=1"><img
- src="http://dyne.org/images/badges/listed-by-unesco_76x36.png" alt="Dyne and Freaknet are listed on the Unesco Archives portal since 2002"/></a></li>
- </ul>
- </section>
-
- <section id="badges">
- <h2>Internet Campains</h2>
- <ul>
- <li><a href="http://w2.eff.org/br/"><img src="http://dyne.org/images/badges/eff-blue-ribbon_80x15.png" alt="EFF Free Speech Campain"/></a></li>
- <li><a href="http://nosoftwarepatents.com/"><img src="http://dyne.org/images/badges/no-software-patents_80x15.png" alt="No Software Patents!"/></a></li>
- <li><a href="http://www.fsf.org/resources/formats/playogg"><img src="http://dyne.org/images/badges/play-ogg_80x15.png" alt="Play OGG"/></a></li>
- <li><a href="http://www.defectivebydesign.org/join/button"><img src="http://dyne.org/images/badges/no-drm_80x15.png" alt="Digital Rights Now!"/></a></li>
- <li><a href="http://code.dyne.org/"><img src="http://dyne.org/images/badges/dyne-software_80x15.png" alt="dyne.org software badge"/></a></li>
- </ul>
- </section>
-
- <section id="credits">
- <h2>Credits</h2>
- <p><a href="http://dyne.org/" target="_top"><img src="http://dyne.org/dyne-sm.png" alt="dyne.org stamp" /></a></p>
- <p>Dyne hosting is kindly provided by
- <a href="http://nimk.nl/">nimk.nl</a>
- and
- <a href="http://servus.at/">servus.at</a></p>
- <p id="clustrMaps"></p>
- </section>
-
- </footer>
- <script type="text/javascript" src="http://www.google.com/jsapi"></script>
- <script type="text/javascript">google.load("jquery", "1.4.0");</script>
- <script type="text/javascript" src="/javascripts/dyne.js"></script>
-</body>
-</html>
diff --git a/web/templates/_header.tpl b/web/templates/_header.tpl
deleted file mode 100644
index 2832bfc..0000000
--- a/web/templates/_header.tpl
+++ /dev/null
@@ -1,53 +0,0 @@
-<!doctype html>
-<html class="{$page_class}">
-<head>
- <title> :: d y n e . o r g :: {$page_title}</title>
-
- <link rel="stylesheet" type="text/css" href="stylesheets/dyne5.css" media="all" title="Dyne" />
- <link rel="stylesheet" type="text/css" href="stylesheets/org-mode.css" />
- <link rel="stylesheet" type="text/css" href="stylesheets/org-htmlize-src.css" />
-
- <link rel="icon" type="image/png" href="{$moebius_png}" />
- <link rel="alternate" type="application/rss+xml" title="RSS 2.0" href="http://feeds.dyne.org/planet_dyne" />
- <link rel="alternate" type="application/ical+xml" title="Ical 1.0" href="http://dyne.org/events/dyne.ics" />
-
- <link rel="about" type="text/html" href="http://dyne.org/dyne_foundation" />
- <link rel="code" type="text/html" href="http://code.dyne.org" />
- <link rel="culture" type="text/html" href="http://dyne.org/culture" />
- <link rel="discussion" type="text/html" href="http://lists.dyne.org" />
- <link rel="donate" type="text/html" href="http://dyne.org/donate" />
- <link rel="events" type="text/html" href="http://dyne.org/events" />
- <link rel="software" type="text/html" href="http://dyne.org/software" />
-
- <meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
-{if isset($description) && $description neq ""}
- <meta name="Description" content="{$description}" />
-{else}
- <meta name="Description" content="Since 2000 dyne.org is an atelier for digital artisans. We design free software and ideas for the arts, sharing a grassroot access to technology, education and freedom of creation." />
-{/if}
- <meta name="Generator" content="Weaver Birds" />
-{if isset($keywords) && $keywords neq ""}
- <meta name="Keywords" content="{$keywords}" />
-{else}
- <meta name="Keywords" content="free, software, art, source, open, creativity, code, gnu, linux, bsd, streaming, audio, video, development, seminar, performance, theatre, music, hacktivism, gpl, copyleft, multimedia, ict4d, documentation, community" />
-{/if}
- <meta name="MSSmartTagsPreventParsing" content="True" /><!-- IE sucks. Why do I have to opt-out from their stupid hack? -->
- <!-- HTML5 support for MSIE hahahaha http://remysharp.com/2009/01/07/html5-enabling-script/ -->
- <!--[if IE]>
- <script src="http://html5shiv.googlecode.com/svn/trunk/html5.js"></script>
- <![endif]-->
-</head>
-<body>
-<header>
- <nav><ul id="dyne_links">
- <li><a href="http://dyne.org/">dyne</a> //</li>
- <li><a href="software">software</a></li>
- <li>:: <a href="culture">culture</a></li>
- <li>:: <a href="events">events</a></li>
- <li>:: <a href="http://planet.dyne.org/">news</a></li>
- <li>:: <a href="http://lists.dyne.org/">discussion</a></li>
- <li>:: <a href="http://museum.dyne.org/">museum</a></li>
- <li>\\ <a href="http://freaknet.org/">freaknet</a></li>
- </ul></nav>
- <hgroup>{$page_hgroup}</hgroup>
-</header>
diff --git a/web/templates/software/doctypes.tpl b/web/templates/software/doctypes.tpl
deleted file mode 100644
index 38c0c6c..0000000
--- a/web/templates/software/doctypes.tpl
+++ /dev/null
@@ -1,7 +0,0 @@
-
-<div id="document-types">
-<p>
-Document available <br/>
-in <a href="index.pdf">PDF</a> and <a href="index.txt">pure text</a>
-</p>
-</div>