From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Tim Johnson Newsgroups: gmane.emacs.help Subject: Re: Suite of Color Themes for console Date: Fri, 24 Oct 2014 07:43:00 -0800 Organization: AkWebsoft Message-ID: <20141024154300.GA1671@mail.akwebsoft.com> References: <20141021233258.GB94184@mail.akwebsoft.com> <877fztyn9g.fsf@gmail.com> <20141022003528.GC94184@mail.akwebsoft.com> <87r3xy1hgr.fsf@skimble.plus.com> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1414165412 4966 80.91.229.3 (24 Oct 2014 15:43:32 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 24 Oct 2014 15:43:32 +0000 (UTC) To: help-gnu-emacs Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Fri Oct 24 17:43:28 2014 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Xhh1T-00068D-L2 for geh-help-gnu-emacs@m.gmane.org; Fri, 24 Oct 2014 17:43:27 +0200 Original-Received: from localhost ([::1]:49199 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Xhh1T-0005eG-5N for geh-help-gnu-emacs@m.gmane.org; Fri, 24 Oct 2014 11:43:27 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:59301) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Xhh1B-0005Y7-AV for help-gnu-emacs@gnu.org; Fri, 24 Oct 2014 11:43:13 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Xhh16-0001IZ-Ph for help-gnu-emacs@gnu.org; Fri, 24 Oct 2014 11:43:09 -0400 Original-Received: from 191-232-4-64.mtaonline.net ([64.4.232.191]:49416 helo=tj49.com) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Xhh16-0001HV-Hw for help-gnu-emacs@gnu.org; Fri, 24 Oct 2014 11:43:04 -0400 Original-Received: by tj49.com (Postfix, from userid 501) id 634FB515275D; Fri, 24 Oct 2014 07:43:00 -0800 (AKDT) Mail-Followup-To: help-gnu-emacs Content-Disposition: inline In-Reply-To: <87r3xy1hgr.fsf@skimble.plus.com> User-Agent: Mutt/1.4.2.3i X-detected-operating-system: by eggs.gnu.org: Mac OS X 10.x X-Received-From: 64.4.232.191 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:100587 Archived-At: * Sharon Kimble [141023 15:43]: > Jacob Gerlach writes: > > > I believe there is some important distinction between custom themes and > > color themes (although I can't recall what it is). My setup is below > > (collected from various sources like the wiki - I don't claim any credit). > > I think this is the "wrapper" you're looking for. > > > > (add-to-list 'custom-theme-load-path > > (file-name-as-directory > > "/home/jacob/.emacs.d/replace-colorthemes")) > > > > ;; Cycle through this set of themes > > (setq my-themes '(robin-hood charcoal-black classic dark-blue desert)) > > > > (setq my-cur-theme nil) > > (defun cycle-my-theme () > > "Cycle through a list of themes, my-themes" > > (interactive) > > (when my-cur-theme > > (disable-theme my-cur-theme) > > (setq my-themes (append my-themes (list my-cur-theme)))) > > (setq my-cur-theme (pop my-themes)) > > (load-theme my-cur-theme t)) > > > > ;; Switch to the first theme in the list above > > (cycle-my-theme) > > (global-set-key (kbd "C-t") 'cycle-my-theme) > > > > The first theme in "my-themes" will be loaded on startup, and you can bind > > cycling (as I have to C-t) to make it quick and easy. > > Thanks for this Jacob, it is very useful. But I do wonder if it could be > "tweaked" such that it displays the name of the theme in that black bar > at the top of emacs just before it gets onto the system-bar of the > desktop? Also, I've got a lot of themes from ELPA, which on this box is > at "/home/boudiccas/.emacs.d/elpa" which I would dearly love to use, > like this, and it works! > > --8<---------------cut here---------------start------------->8--- > (add-to-list 'custom-theme-load-path > (file-name-as-directory > "/home/boudiccas/git/replace-colorthemes")) > (add-to-list 'custom-theme-load-path "/home/boudiccas/.emacs.d/themes") > (add-to-list 'custom-theme-load-path "/home/boudiccas/.emacs.d/elpa") > --8<---------------cut here---------------end--------------->8--- > > > Any ideas please? > > Thanks > Sharon. What I would do (bearing in mind my limited knowledge of emacs and the fact that I prefer console mode) is have a variable that keeps track of the current theme - in my coded solution that would be 'tj-current-theme and include that variable in mode-line-format. That should be easy but also redundant as it would appear in every window. -- Tim tim at tee jay forty nine dot com or akwebsoft dot com http://www.akwebsoft.com, http://www.tj49.com