emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/color-theme-tangotango 0555c83 39/58: Update code markup


From: ELPA Syncer
Subject: [nongnu] elpa/color-theme-tangotango 0555c83 39/58: Update code markup
Date: Thu, 21 Oct 2021 18:03:02 -0400 (EDT)

branch: elpa/color-theme-tangotango
commit 0555c835c1a43181431685834865244d45d3f9bf
Author: Julien Barnier <julien@nozav.org>
Commit: Julien Barnier <julien@nozav.org>

    Update code markup
---
 README.org | 86 +++++++++++++++++++++++++++++---------------------------------
 1 file changed, 40 insertions(+), 46 deletions(-)

diff --git a/README.org b/README.org
index 7c27179..23fa8b9 100644
--- a/README.org
+++ b/README.org
@@ -26,16 +26,12 @@ party package or extension.
 2. Try it with =M-x load-theme=
 3. If you like it, just add the following line to your =.emacs= :
 
-#+begin_src
-(load-theme 'tangotango t)
-#+end_src
+: (load-theme 'tangotango t)
 
 If you prefer to place your theme files in another directory, you can just add
 something like the following in your =.emacs= before loading the theme :
 
-#+begin_src
-(add-to-list 'custom-theme-load-path "~/.emacs.d/color-theme-tangotango")
-#+end_src
+: (add-to-list 'custom-theme-load-path "~/.emacs.d/color-theme-tangotango")
 
 ** Emacs 23
 
@@ -50,46 +46,44 @@ documented on 
[[http://www.emacswiki.org/emacs/ColorTheme][emacswiki]]. The way
 emacs and allows the selection of different themes for GUI or console based
 frames :
 
-#+begin_src emacs-lisp
-(require 'color-theme)
-(setq color-theme-load-all-themes nil)
-
-(require 'color-theme-tangotango)
-
-;; select theme - first list element is for windowing system, second is for 
console/terminal
-;; Source : http://www.emacswiki.org/emacs/ColorTheme#toc9
-(setq color-theme-choices 
-      '(color-theme-tangotango color-theme-tangotango))
-
-;; default-start
-(funcall (lambda (cols)
-          (let ((color-theme-is-global nil))
-            (eval 
-             (append '(if (window-system))
-                     (mapcar (lambda (x) (cons x nil)) 
-                             cols)))))
-        color-theme-choices)
-
-;; test for each additional frame or console
-(require 'cl)
-(fset 'test-win-sys 
-      (funcall (lambda (cols)
-                (lexical-let ((cols cols))
-                  (lambda (frame)
-                    (let ((color-theme-is-global nil))
-                      ;; must be current for local ctheme
-                      (select-frame frame)
-                      ;; test winsystem
-                      (eval 
-                       (append '(if (window-system frame)) 
-                               (mapcar (lambda (x) (cons x nil)) 
-                                       cols)))))))
-              color-theme-choices ))
-;; hook on after-make-frame-functions
-(add-hook 'after-make-frame-functions 'test-win-sys)
-
-(color-theme-tangotango)
-#+end_src
+: (require 'color-theme)
+: (setq color-theme-load-all-themes nil)
+: 
+: (require 'color-theme-tangotango)
+: 
+: ;; select theme - first list element is for windowing system, second is for 
console/terminal
+: ;; Source : http://www.emacswiki.org/emacs/ColorTheme#toc9
+: (setq color-theme-choices 
+:       '(color-theme-tangotango color-theme-tangotango))
+: 
+: ;; default-start
+: (funcall (lambda (cols)
+:         (let ((color-theme-is-global nil))
+:           (eval 
+:            (append '(if (window-system))
+:                    (mapcar (lambda (x) (cons x nil)) 
+:                            cols)))))
+:       color-theme-choices)
+: 
+: ;; test for each additional frame or console
+: (require 'cl)
+: (fset 'test-win-sys 
+:       (funcall (lambda (cols)
+:               (lexical-let ((cols cols))
+:                 (lambda (frame)
+:                   (let ((color-theme-is-global nil))
+:                     ;; must be current for local ctheme
+:                     (select-frame frame)
+:                     ;; test winsystem
+:                     (eval 
+:                      (append '(if (window-system frame)) 
+:                              (mapcar (lambda (x) (cons x nil)) 
+:                                      cols)))))))
+:             color-theme-choices ))
+: ;; hook on after-make-frame-functions
+: (add-hook 'after-make-frame-functions 'test-win-sys)
+: 
+: (color-theme-tangotango)
 
 Note that I also had to add a (color-theme-tangotango) line at the end of my
 =.gnus= file in order to apply the color theme to Gnus.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]