fiddlerwoaroof/dotfiles - Change EYCKE7UUC5RNMS7MAYKWAQOQM67BMV3CENAC5JU53F2PHQW4ZQQQC

feat: add clon themes

Created by fiddlerwoaroof on April 27, 2023

EYCKE7UUC5RNMS7MAYKWAQOQM67BMV3CENAC5JU53F2PHQW4ZQQQC

Dependencies

In channels

main

Change contents

File deletion: dependencies, dependencies
BFD:BFD[3.1] → [4.129:152]
BFD:BFD[3.1] → [4.129:152]
BFD:BFD[4.152] → [4.128:128]
File addition: clon (d--x------)
[5.2]
File addition: themes (d--x------)
[0.256]

File addition: roomy.cth (----------)

[0.274]

;;; roomy.cth --- Roomy theme                                    -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme has a lot of space in it. Option descriptions start on their own
;; line, groups and plain texts are separated by empty lines. Group titles
;; appear in bold font, and option syntax is underlined.
;;; Code:
:face (synopsis :padding-bottom 1)
:face (text :padding-top 1 :padding-bottom 1)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :item-separator #\newline
	      :face (syntax :item-separator ", "
			    :underline t
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :padding-left 5
			   :item-separator #\newline
			   :face (fallback :face (header :bold nil))
			   :face (default :face (header :bold nil))))
:face (group :padding-top 1 :padding-bottom 1
	     :item-separator #\newline
	     :face (header :bold t)
	     :face (group :padding-left 2 :padding-top 0 :padding-bottom 0
			  :item-separator #\newline))
;;; roomy.cth ends here

File addition: refcard.cth (----------)

[0.274]

;;; refcard.cth --- Reference card theme                         -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme provides a "reference card" compact layout. Elements displayed
;; are program synopsis, option syntax and group titles. Neither plain text
;; nor options descriptions appear in the output. Group titles appear in bold
;; font and options are packed together per group.
;;; Code:
:item-separator ", "
:face (synopsis :bold t :padding-bottom 1)
:face (text :hidden t)
:face (option :padding-left 2
	      :face (syntax :item-separator "/"
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :hidden t))
:face (group :padding-top 0 :padding-bottom 0
	     :face (header :bold t :padding-bottom 0)
	     :face (items :item-separator ", "
			  :face (group :padding-left 2
				       :padding-top 0
				       :padding-bottom 0)))
;;; refcard.cth ends here

File addition: raw.cth (----------)

[0.274]

;;; raw.cth --- Raw theme                                        -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This is the equivalent of the default theme used internally by Clon when no
;; other theme is specified or can be found. Options have an indentation of 2
;; columns and their descriptions start at column 30. Groups are indented left
;; by 2 columns from level 2. Note that this theme provides a complete face
;; tree, apart from the implicit TOPLEVEL face.
;;; Code:
:face (synopsis :padding-bottom 1
		:face header
		:face program
		:face short-pack
		:face negated-pack
		:face options
		:face postfix)
:face (text :padding-top 0 :padding-bottom 0)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :face (short :item-separator nil
					 :face name
					 :face argument)
			    :face (long :item-separator nil
					:face name
					:face argument))
	      :face (usage :padding-left (30 absolute)
			   :face description
			   :face (fallback :padding-top 0
					   :face header
					   :face value)
			   :face (default :padding-top 0
					  :face header
					  :face value)
			   :face (environment :padding-top 0
					      :face header
					      :face variable)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (header :padding-top 0 :padding-bottom 0)
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; raw.cth ends here

File addition: optlist.cth (----------)

[0.274]

;;; optlist.cth --- Option list theme                            -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme provides only a list of options and their syntax, but without
;; description. Group titles or plain texts are not displayed.
;;; Code:
:item-separator #\Newline
:face (synopsis :hidden t)
:face (text :hidden t)
:face (option :padding-left 2
	      :face (syntax :item-separator ", "
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :hidden t))
:face (group :face (header :hidden t)
	     :face (items :item-separator #\Newline))
;;; optlist.cth ends here

File addition: el.cth (----------)

[0.274]

;;; dvl.cth --- My personal theme                                 -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;;; Code:
:face (header :bold t)
:face (synopsis :padding-bottom 1
		:face (short-pack :foreground cyan :bold t)
		:face (negated-pack :foreground cyan :bold t))
:face (text :padding-top 0 :padding-bottom 0 :foreground green)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :foreground cyan
			    :face (short :item-separator nil
					 :face (name :bold t))
			    :face (long :item-separator nil
					:face (name :bold t)))
	      :face (usage :padding-left (30 absolute)
			   :face (fallback :padding-top 0 :foreground yellow)
			   :face (default :padding-top 0 :foreground yellow)
			   :face (environment :padding-top 0
					      :foreground yellow)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; dvl.cth ends here

File addition: dvl.cth (----------)

[0.274]

;;; dvl.cth --- My personal theme                                 -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;;; Code:
:face (header :bold t)
:face (synopsis :padding-bottom 1
		:face (short-pack :foreground cyan :bold t)
		:face (negated-pack :foreground cyan :bold t))
:face (text :padding-top 0 :padding-bottom 0 :foreground green)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :foreground cyan
			    :face (short :item-separator nil
					 :face (name :bold t))
			    :face (long :item-separator nil
					:face (name :bold t)))
	      :face (usage :padding-left (30 absolute)
			   :face (fallback :padding-top 0 :foreground yellow)
			   :face (default :padding-top 0 :foreground yellow)
			   :face (environment :padding-top 0
					      :foreground yellow)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; dvl.cth ends here

File addition: christmas.cth (----------)

[0.274]

;;; christmas.cth --- Christmas theme                            -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme is not meant to be used, but rather to illustrate most of the
;; highlighting features of Clon.
;;; Code:
:padding-right 0
:background blue
:face (synopsis :padding-bottom 1 :bold t)
:face (text :padding-top 0 :padding-bottom 0
	    :foreground red)
:face (option :padding-left 2 :padding-right 2 :padding-top 0 :padding-bottom 0
	      :background cyan
	      :face (syntax :item-separator ", "
			    :padding-right (29 absolute)
			    :background magenta
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :padding-left (30 absolute) :padding-right 0
			   :background green
			   :face (fallback :bold t
					   :foreground yellow
					   :padding-top 0
					   :face (header :underline t)
					   :face (value :blink t))
			   :face (default :padding-top 0
				   :bold t
				   :foreground yellow
				   :face (header :underline t)
				   :face (value :blink t))
			   :face (environment :bold t
					      :foreground yellow
					      :padding-top 0
					      :face (header :underline t)
					      :face (variable :blink t))))
:face (group :padding-right 0 :padding-top 0 :padding-bottom 0
	     :face (header :padding-top 0 :padding-bottom 0
			  :underline t :bold t)
	     :face (items :padding-right 0 :padding-top 0 :padding-bottom 0)
	     :face (group :padding-left 2 :padding-right 0))
;;; christmas.cth ends here

File addition: roomy.cth (----------)

[0.274]

;;; roomy.cth --- Roomy theme                                    -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme has a lot of space in it. Option descriptions start on their own
;; line, groups and plain texts are separated by empty lines. Group titles
;; appear in bold font, and option syntax is underlined.
;;; Code:
:face (synopsis :padding-bottom 1)
:face (text :padding-top 1 :padding-bottom 1)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :item-separator #\newline
	      :face (syntax :item-separator ", "
			    :underline t
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :padding-left 5
			   :item-separator #\newline
			   :face (fallback :face (header :bold nil))
			   :face (default :face (header :bold nil))))
:face (group :padding-top 1 :padding-bottom 1
	     :item-separator #\newline
	     :face (header :bold t)
	     :face (group :padding-left 2 :padding-top 0 :padding-bottom 0
			  :item-separator #\newline))
;;; roomy.cth ends here

File addition: refcard.cth (----------)

[0.274]

;;; refcard.cth --- Reference card theme                         -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme provides a "reference card" compact layout. Elements displayed
;; are program synopsis, option syntax and group titles. Neither plain text
;; nor options descriptions appear in the output. Group titles appear in bold
;; font and options are packed together per group.
;;; Code:
:item-separator ", "
:face (synopsis :bold t :padding-bottom 1)
:face (text :hidden t)
:face (option :padding-left 2
	      :face (syntax :item-separator "/"
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :hidden t))
:face (group :padding-top 0 :padding-bottom 0
	     :face (header :bold t :padding-bottom 0)
	     :face (items :item-separator ", "
			  :face (group :padding-left 2
				       :padding-top 0
				       :padding-bottom 0)))
;;; refcard.cth ends here

File addition: raw.cth (----------)

[0.274]

;;; raw.cth --- Raw theme                                        -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This is the equivalent of the default theme used internally by Clon when no
;; other theme is specified or can be found. Options have an indentation of 2
;; columns and their descriptions start at column 30. Groups are indented left
;; by 2 columns from level 2. Note that this theme provides a complete face
;; tree, apart from the implicit TOPLEVEL face.
;;; Code:
:face (synopsis :padding-bottom 1
		:face header
		:face program
		:face short-pack
		:face negated-pack
		:face options
		:face postfix)
:face (text :padding-top 0 :padding-bottom 0)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :face (short :item-separator nil
					 :face name
					 :face argument)
			    :face (long :item-separator nil
					:face name
					:face argument))
	      :face (usage :padding-left (30 absolute)
			   :face description
			   :face (fallback :padding-top 0
					   :face header
					   :face value)
			   :face (default :padding-top 0
					  :face header
					  :face value)
			   :face (environment :padding-top 0
					      :face header
					      :face variable)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (header :padding-top 0 :padding-bottom 0)
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; raw.cth ends here

File addition: optlist.cth (----------)

[0.274]

;;; optlist.cth --- Option list theme                            -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme provides only a list of options and their syntax, but without
;; description. Group titles or plain texts are not displayed.
;;; Code:
:item-separator #\Newline
:face (synopsis :hidden t)
:face (text :hidden t)
:face (option :padding-left 2
	      :face (syntax :item-separator ", "
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :hidden t))
:face (group :face (header :hidden t)
	     :face (items :item-separator #\Newline))
;;; optlist.cth ends here

File addition: el.cth (----------)

[0.274]

;;; dvl.cth --- My personal theme                                 -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;;; Code:
:face (header :bold t)
:face (synopsis :padding-bottom 1
		:face (short-pack :foreground cyan :bold t)
		:face (negated-pack :foreground cyan :bold t))
:face (text :padding-top 0 :padding-bottom 0 :foreground green)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :foreground cyan
			    :face (short :item-separator nil
					 :face (name :bold t))
			    :face (long :item-separator nil
					:face (name :bold t)))
	      :face (usage :padding-left (30 absolute)
			   :face (fallback :padding-top 0 :foreground yellow)
			   :face (default :padding-top 0 :foreground yellow)
			   :face (environment :padding-top 0
					      :foreground yellow)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; dvl.cth ends here

File addition: dvl.cth (----------)

[0.274]

;;; dvl.cth --- My personal theme                                 -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;;; Code:
:face (header :bold t)
:face (synopsis :padding-bottom 1
		:face (short-pack :foreground cyan :bold t)
		:face (negated-pack :foreground cyan :bold t))
:face (text :padding-top 0 :padding-bottom 0 :foreground green)
:face (option :padding-left 2 :padding-top 0 :padding-bottom 0
	      :face (syntax :item-separator ", "
			    :foreground cyan
			    :face (short :item-separator nil
					 :face (name :bold t))
			    :face (long :item-separator nil
					:face (name :bold t)))
	      :face (usage :padding-left (30 absolute)
			   :face (fallback :padding-top 0 :foreground yellow)
			   :face (default :padding-top 0 :foreground yellow)
			   :face (environment :padding-top 0
					      :foreground yellow)))
:face (group :padding-top 0 :padding-bottom 0
	     :face (items :padding-top 0 :padding-bottom 0
			  :face (group :padding-top 0
				       :padding-bottom 0
				       :padding-left 2)
			  #| :face text :face option |#))
;;; dvl.cth ends here

File addition: christmas.cth (----------)

[0.274]

;;; christmas.cth --- Christmas theme                            -*- lisp -*-
;; Copyright (C) 2010, 2011, 2015 Didier Verna
;; Author: Didier Verna <didier@didierverna.net>
;; This file is part of Clon.
;; Permission to use, copy, modify, and distribute this software for any
;; purpose with or without fee is hereby granted, provided that the above
;; copyright notice and this permission notice appear in all copies.
;; THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
;;; Commentary:
;; Contents management by FCM version 0.1.
;; This theme is not meant to be used, but rather to illustrate most of the
;; highlighting features of Clon.
;;; Code:
:padding-right 0
:background blue
:face (synopsis :padding-bottom 1 :bold t)
:face (text :padding-top 0 :padding-bottom 0
	    :foreground red)
:face (option :padding-left 2 :padding-right 2 :padding-top 0 :padding-bottom 0
	      :background cyan
	      :face (syntax :item-separator ", "
			    :padding-right (29 absolute)
			    :background magenta
			    :face (short :item-separator nil)
			    :face (long  :item-separator nil))
	      :face (usage :padding-left (30 absolute) :padding-right 0
			   :background green
			   :face (fallback :bold t
					   :foreground yellow
					   :padding-top 0
					   :face (header :underline t)
					   :face (value :blink t))
			   :face (default :padding-top 0
				   :bold t
				   :foreground yellow
				   :face (header :underline t)
				   :face (value :blink t))
			   :face (environment :bold t
					      :foreground yellow
					      :padding-top 0
					      :face (header :underline t)
					      :face (variable :blink t))))
:face (group :padding-right 0 :padding-top 0 :padding-bottom 0
	     :face (header :padding-top 0 :padding-bottom 0
			  :underline t :bold t)
	     :face (items :padding-right 0 :padding-top 0 :padding-bottom 0)
	     :face (group :padding-left 2 :padding-right 0))
;;; christmas.cth ends here

feat: add clon themes

Dependencies

In channels

Change contents

File deletion: dependencies, dependencies

File addition: clon (d--x------)

File addition: themes (d--x------)

File addition: roomy.cth (----------)

File addition: refcard.cth (----------)

File addition: raw.cth (----------)

File addition: optlist.cth (----------)

File addition: el.cth (----------)

File addition: dvl.cth (----------)

File addition: christmas.cth (----------)

File addition: roomy.cth (----------)

File addition: refcard.cth (----------)

File addition: raw.cth (----------)

File addition: optlist.cth (----------)

File addition: el.cth (----------)

File addition: dvl.cth (----------)

File addition: christmas.cth (----------)