view etc/custom/example-themes/example-theme.el @ 4415:bceb3e285ae7

case-tests.el: fix it on non-DEBUG_XEMACS; save standard-case-table, use it 2008-01-30 Aidan Kehoe <kehoea@parhasard.net> * automated/case-tests.el (pristine-case-table): New var, reflecting the standard case table before case-table.el messes with it. * automated/case-tests.el: Call Skip-Test-Unless correctly, following Vin's report of 20a807210801300635v7533d26rdb32a8d82fb4239b@mail.gmail.com . Use pristine-case-table, add in a couple more tests. * automated/test-harness.el (test-harness-from-buffer): Update the error message in the light of tests skipped for other reasons (not to do with absent packages). In this case, because we're exposing diagnostics in a DEBUG_XEMACS build that are no appropriate to expose to non-DEBUG_XEMACS builds.
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 30 Jan 2008 22:33:29 +0100
parents 74fd4e045ea6
children 1de041b8edf7
line wrap: on
line source

;;;autoload 
(deftheme example
  "A sample theme for customize theme support."
  :variable-set-string "This variable has been made an example.")

(custom-theme-load-themes 'example
    'europe)

(custom-theme-set-variables 'example
 '(iswitchb-prompt-newbuffer nil))

(provide-theme 'example)