[Top][All Lists]

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

Color-theme problems in Emacs 22+ (Ubuntu, Windows)

From: Sébastien Vauban
Subject: Color-theme problems in Emacs 22+ (Ubuntu, Windows)
Date: Fri, 12 Jan 2007 10:18:41 +0100
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:


    I just installed Ubuntu Edgy 6.10, and still experiences
    problems with `color-theme' (versions 6.5.4, 6.5.5 and
    6.6.0) under Emacs Snapshot (GTK).

    I see some of my colors sometimes (for example, when editing
    my .emacs file), but it's never ever applied to my Group
    buffer. In other words, I cannot tell anymore which groups
    contain or not unread mails (as I expect them to become bold
    if they contain unread material).

    See an example of Ubuntu 6.10 + Emacs +
    color-theme 6.6.0 on http://www.mygooglest.com/sva/Screenshot.png.

    Please note I have the same symptoms with the latest
    versions of Emacs binaries for Windows (starting from Emacs

    As far as I can tell, everything works fine under Emacs 21,
    both under Ubuntu and Windows. But it does not with the most
    recent versions of Emacs (snapshots 22+).

    Please note as well (you can see it on the example) that
    `list-colors-display' only returns black on white
    characters. Nothing's colored anymore in that results

    Additional information: my personal color theme (see end of
    this mail).

    Many thanks to all for the precious support you can bring!

If emacs crashed, and you have the emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
/usr/share/emacs/22.0.50/etc/DEBUG for instructions.

In GNU Emacs (i486-pc-linux-gnu, GTK+ Version 2.10.3)
 of 2006-09-19 on rothera, modified by Debian
 (Debian emacs-snapshot package, version 1:20060915-1)
X server distributor `The X.Org Foundation', version 11.0.70101000
configured using `configure  '--build' 'i486-linux-gnu' '--host' 
'i486-linux-gnu' '--prefix=/usr' '--sharedstatedir=/var/lib' 
'--libexecdir=/usr/lib' '--localstatedir=/var' '--infodir=/usr/share/info' 
'--mandir=/usr/share/man' '--with-pop=yes' 
 '--with-x=yes' '--with-x-toolkit=gtk' 'build_alias=i486-linux-gnu' 
'host_alias=i486-linux-gnu' 'CFLAGS=-DDEBIAN -DSITELOAD_PURESIZE_EXTRA=5000 -g 

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8
  default-enable-multibyte-characters: t

Major mode: Group

Minor modes in effect:
  gnus-topic-mode: t
  gnus-undo-mode: t
  show-paren-mode: t
  strokes-mode: t
  recentf-mode: t
  auto-image-file-mode: t
  shell-dirtrack-mode: t
  display-time-mode: t
  icomplete-mode: t
  tooltip-mode: t
  tool-bar-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-decoding-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  temp-buffer-resize-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<up> <return> <up> <return> <f5> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <f12> y e s <return> <f12> 
M-x <up> <return> <up> <return> <down> <down> <down> 
<down> <f5> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <down> <down> <down> <down> <down> <down> <down> 
<down> <f12> y e s <return> q M-x <up> <return>

Recent messages:
Starting new Ispell process...
Checking for library `filladapt'... Found
Ispell process killed
(Next Ispell command will use default dictionary)
Starting new Ispell process...
Ispell process killed
(Next local Ispell command will use francais dictionary)
Using the <SebastienVaubanID> Identity
(Next local Ispell command will use francais dictionary)
Starting new Ispell process...


;;; color-theme-sva.el --- my color theme

(require 'color-theme)

(defun color-theme-sva ()
  "Initialize faces according to my preferences."
     ((background-color . "white")
      (background-mode . light)
      (border-color . "black")
      (cursor-color . "rgb:15/FF/00")
      (foreground-color . "black")
      (mouse-color . "black"))

     (default ((t (nil))))
     (bold ((t (:bold t :weight bold))))
     (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
     (italic ((t (:italic t :slant italic))))
     (underline ((t (:underline t))))
     (highlight ((t (:foreground "white" :background "rgb:31/6A/C5"))))  ;; 

     ;; bbdb
     (bbdb-company ((t (:foreground "steel blue" :italic t))))
     (bbdb-field-name ((t (:foreground "steel blue" :bold t))))
     (bbdb-field-value ((t (:foreground "steel blue"))))
     (bbdb-name ((t (:foreground "rgb:FF/66/33" :underline t))))

     (calendar-today-face ((t (:bold t :weight bold :background "yellow"))))

     (comint-highlight-input ((t (:bold t :weight bold))))
     (comint-highlight-prompt ((t (:foreground "blue"))))

     ;; custom
     (custom-saved-face ((t (:underline t))))
     (custom-state-face ((t (:foreground "dark green"))))
     (custom-button-pressed-face ((t (:background "lightgrey"
                                      :foreground "black"
                                      :box (:line-width 2
                                            :style pressed-button)))))
     (custom-modified-face ((t (:background "blue" :foreground "white"))))
     (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
     (custom-set-face ((t (:background "white" :foreground "blue"))))
     (custom-changed-face ((t (:background "blue" :foreground "white"))))
     (custom-rogue-face ((t (:background "black" :foreground "pink"))))
     (custom-face-tag-face ((t (:underline t))))
     (custom-variable-button-face ((t (:bold t :underline t :weight bold))))

     ;; cvs
     (cvs-filename-face ((t (:foreground "blue4"))))
     (cvs-handled-face ((t (:foreground "pink"))))
     (cvs-header-face ((t (:foreground "blue4" :bold t))))
     (cvs-marked-face ((t (:foreground "green3" :bold t))))
     (cvs-msg-face ((t (:italic t :foreground "gray55"))))
     (cvs-need-action-face ((t (:foreground "orange"))))
     (cvs-unknown-face ((t (:foreground "red"))))

     ;; subversion
     (svn-status-marked-face ((t (:foreground "green3" :bold t))))
     (svn-status-marked-popup-face ((t (:foreground "green3" :bold t))))
     (svn-status-update-available-face ((t (:foreground "orange"))))
     (svn-status-directory-face ((t (:foreground "blue" :bold t))))
     (svn-status-filename-face ((t (:foreground "magenta3"))))
     (svn-status-symlink-face  ((t (:foreground "cyan"))))
     (svn-status-locked-face ((t (:foreground "red" :bold t))))
     (svn-status-switched-face ((t (:italic t :foreground "gray55"))))

     ;; diary
     (diary-face ((t (:foreground "red"))))

     ;; dircolors
     (dircolors-face-asm ((t (:foreground "blue3"))))
     (dircolors-face-backup ((t (:foreground "blue3"))))
     (dircolors-face-compress ((t (:foreground "red"))))
     (dircolors-face-dir ((t (:foreground "blue" :bold t))))
     (dircolors-face-doc ((t (:foreground "gold"))))
     (dircolors-face-dos ((t (:foreground "green3"))))
     (dircolors-face-emacs ((t (:foreground "turquoise3"))))
     (dircolors-face-html ((t (:foreground "gold"))))
     (dircolors-face-img ((t (:foreground "magenta3"))))
     (dircolors-face-lang ((t (:foreground "turquoise3"))))
     (dircolors-face-lang-interface ((t (:foreground "turquoise3"))))
     (dircolors-face-make ((t (:foreground "green3"))))
     (dircolors-face-objet ((t (:foreground "blue3"))))
     (dircolors-face-package ((t (:foreground "red"))))
     (dircolors-face-paddb ((t (:foreground "blue3"))))
     (dircolors-face-ps ((t (:foreground "gold"))))
     (dircolors-face-sound ((t (:foreground "magenta3"))))
     (dircolors-face-tar ((t (:foreground "red"))))
     (dircolors-face-yacc ((t (:foreground "turquoise3"))))

     ;; dired
     (dired-face-boring ((t (:foreground "Gray65"))))
     (dired-face-directory ((t (:bold t))))
     (dired-face-executable ((t (:foreground "SeaGreen"))))
     (dired-face-flagged ((t (:background "LightSlateGray"))))
     (dired-face-header ((t (:background "grey75" :foreground "black"))))
     (dired-face-marked ((t (:background "PaleVioletRed"))))
     (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
     (dired-face-setuid ((t (:foreground "Red"))))
     (dired-face-socket ((t (:foreground "magenta"))))
     (dired-face-symlink ((t (:foreground "cyan"))))

     ;; dired+
     (diredp-date-time ((t (:foreground "rgb:33/64/4E"))))
     (diredp-dir-heading ((t (:background "yellow" :foreground "blue"
                                          :bold t :weight bold))))
     (diredp-dir-priv ((t (:background "yellow" :foreground "blue"
                                       :bold t :weight bold))))
     (diredp-file-name ((t (:foreground "black"))))
     (diredp-file-suffix ((t (:foreground "rgb:7B/46/8E"))))
     (diredp-flag-mark-line ((t (:foreground "red" :bold t :weight bold))))

     ;; emacs wiki
     (emacs-wiki-bad-link-face ((t (:foreground "red" :weight bold))))
     (emacs-wiki-header-1 ((t (:bold t :weight bold :height 1.4))))
     (emacs-wiki-header-2 ((t (:bold t :weight bold :height 1.3))))
     (emacs-wiki-header-3 ((t (:height 1.2))))
     (emacs-wiki-header-4 ((t (:height 1.1))))
     (emacs-wiki-header-5 ((t (:height 1.0))))
     (emacs-wiki-header-6 ((t (:height 0.9))))
     (emacs-wiki-link-face ((t (:foreground "blue" :underline t))))

     ;; flypell
     (flyspell-duplicate-face ((t (:foreground "Gold3" :underline t
                                   :weight bold :bold t))))
     (flyspell-incorrect-face ((t (:foreground "red" :underline t
                                   :bold t))))

     ;; LaTeX
     (font-latex-math-face ((t (:foreground "black"))))
     (font-latex-sedate-face ((t (:foreground "gray45"))))

     (font-lock-comment-face ((t (:foreground "red"))))
     (font-lock-constant-face ((t (:foreground "dark cyan"))))
     (font-lock-function-name-face ((t (:foreground "blue"))))
     (font-lock-keyword-face ((t (:foreground "purple1"))))
     (font-lock-reference-face ((t (:foreground "dark cyan"))))
     (font-lock-string-face ((t (:foreground "green4"))))
     (font-lock-type-face ((t (:foreground "forest green"))))
     (font-lock-variable-name-face ((t (:foreground "magenta"))))
     (font-lock-warning-face ((t (:bold t :foreground "red"))))

     (gnus-splash-face ((t (:foreground "blue"))))

     ;; Gnus group buffer
     (gnus-group-mail-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-group-mail-1-face ((t (:foreground "rgb:50/50/B0" :bold t))))
     (gnus-group-mail-2-empty-face ((t (:foreground "rgb:66/00/66"))))
     (gnus-group-mail-2-face ((t (:foreground "rgb:66/00/66" :bold t))))
     (gnus-group-mail-3-empty-face ((t (:foreground "rgb:00/77/77"))))
     (gnus-group-mail-3-face ((t (:foreground "rgb:00/77/77" :bold t))))

     (gnus-group-news-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-group-news-1-face ((t (:foreground "rgb:50/50/B0" :bold t))))
     (gnus-group-news-2-empty-face ((t (:foreground "rgb:66/00/66"))))
     (gnus-group-news-2-face ((t (:foreground "rgb:66/00/66" :bold t))))
     (gnus-group-news-3-empty-face ((t (:foreground "rgb:00/77/77"))))
     (gnus-group-news-3-face ((t (:foreground "rgb:00/77/77" :bold t))))
     (gnus-group-news-4-empty-face ((t (:foreground "rgb:99/00/00"))))
     (gnus-group-news-4-face ((t (:foreground "rgb:99/00/00" :bold t))))
     (gnus-group-news-5-empty-face ((t (:foreground "rgb:00/00/99"))))
     (gnus-group-news-5-face ((t (:foreground "rgb:00/00/99" :bold t))))
     (gnus-group-news-6-empty-face ((t (:foreground "rgb:BB/66/00"))))
     (gnus-group-news-6-face ((t (:foreground "rgb:BB/66/00" :bold t))))

     ;; Gnus summary buffer
     (gnus-summary-selected-face ((t (:foreground "rgb:FF/66/33" :bold t))))
     (gnus-summary-high-unread-face ((t (:foreground "blue" :bold t))))
     (gnus-summary-high-read-face ((t (:foreground "rgb:80/00/80" :bold t))))
     (gnus-summary-high-ticked-face ((t (:foreground "hot pink" :bold t))))
     (gnus-summary-high-ancient-face ((t (:foreground "rgb:77/77/99" :bold t))))
     (gnus-summary-normal-unread-face ((t (:foreground "blue"))))
     (gnus-summary-normal-read-face ((t (:foreground "rgb:80/00/80"))))
     (gnus-summary-normal-ticked-face ((t (:foreground "hot pink"))))
     (gnus-summary-normal-ancient-face ((t (:foreground "rgb:77/77/99"))))
     (gnus-summary-low-unread-face ((t (:low t :foreground "blue" :italic t))))
     (gnus-summary-low-read-face ((t (:low t :foreground "rgb:80/00/80"
                                      :italic t))))
     (gnus-summary-low-ticked-face ((t (:low t :foreground "hot pink"
                                        :italic t))))
     (gnus-summary-low-ancient-face ((t (:low t :foreground "rgb:77/77/99"
                                         :italic t))))
     (gnus-summary-cancelled-face ((t (:italic t :foreground "gray55"
                                       :strike-through t))))

     ;; Gnus article buffer
     (gnus-header-name-face ((t (:foreground "rgb:33/99/CC" :bold t
                                 :family "Arial"))))
     (gnus-header-from-face ((t (:foreground "blue" :family "Arial"))))
     (gnus-header-subject-face ((t (:foreground "rgb:FF/66/33" :bold t))))
     (gnus-header-newsgroups-face ((t (:foreground "rgb:33/99/CC"
                                       :family "Arial"))))
     (gnus-header-content-face ((t (:foreground "rgb:33/99/CC"
                                    :family "Arial"))))
     (gnus-cite-attribution-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-1 ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-2 ((t (:foreground "rgb:66/00/66"))))
     (gnus-cite-face-3 ((t (:foreground "rgb:00/77/77"))))
     (gnus-cite-face-4 ((t (:foreground "rgb:99/00/00"))))
     (gnus-cite-face-5 ((t (:foreground "rgb:00/00/99"))))
     (gnus-cite-face-6 ((t (:foreground "rgb:BB/66/00"))))
     (gnus-cite-face-7 ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-8 ((t (:foreground "rgb:66/00/66"))))
     (gnus-cite-face-9 ((t (:foreground "rgb:00/77/77"))))
     (gnus-cite-face-10 ((t (:foreground "rgb:99/00/00"))))
     (gnus-signature-face ((t (:foreground "rgb:7F/7F/7F"))))
     (gnus-emphasis-bold ((t (:bold t))))

     (widget-button-face ((t (:bold t :weight bold))))
     (widget-button-pressed-face ((t (:foreground "red"))))
     (widget-documentation-face ((t (:foreground "dark green"))))
     (widget-field-face ((t (:background "gray85"))))
     (widget-inactive-face ((t (:foreground "dim gray"))))
     (widget-single-line-field-face ((t (:background "gray85"))))
;;     (widget-mouse-face . highlight)

     ;; when replying
     (message-header-name-face ((t (:foreground "rgb:33/99/CC" :bold t
                                    :family "Arial"))))
     (message-header-to-face ((t (:foreground "blue" :family "Arial"))))
     (message-header-cc-face ((t (:foreground "blue" :family "Arial"))))
     (message-header-subject-face ((t (:foreground "rgb:FF/66/33" :bold t))))
     (message-header-newsgroups-face ((t (:foreground "rgb:33/99/CC"
                                          :family "Arial"))))
     (message-header-xheader-face ((t (:foreground "red"))))
     (message-header-other-face ((t (:foreground "rgb:33/99/CC"
                                     :family "Arial"))))
     (message-separator-face ((t (:foreground "red" :bold t :family "Arial"))))
     (message-cited-text-face ((t (:foreground "rgb:50/50/B0"))))
     (message-mml-face ((t (:foreground "ForestGreen"))))

     ;; Gnus/Message
     (gnus-emphasis-highlight-words ((t (:background "black"
                                         :foreground "yellow"))))
     (gnus-picon-face ((t (:background "white" :foreground "yellow"))))
     (gnus-picon-xbm-face ((t (:background "white" :foreground "yellow"))))
     (gnus-x-face ((t (:background "white" :foreground "black"))))

     (html-helper-bold-face ((t (:foreground "black" :bold t))))
     (html-helper-italic-face ((t (:foreground "black" :slant italic))))
     (html-helper-underline-face ((t (:foreground "black" :underline t))))
     (html-tag-face ((t (:foreground "blue"))))

     (info-header-node ((t (:foreground "magenta" :underline t)))) ;; node name
     (info-header-xref ((t (:foreground "dodger blue" :underline t))))
                                                                  ;; node names
     (info-menu-5 ((t (:foreground "dark orange" :underline t)))) ;; special *
     (info-menu-header ((t (:foreground "red" :underline t)))) ;; major topics
     (info-node ((t (:foreground "blue" :underline t)))) ;; XEmacs manuals
     (info-xref ((t (:bold t :foreground "magenta4" :weight bold))))

     ;; highlighting matches
     (match ((t (:background "yellow" :foreground "rgb:EE/66/00" :bold t))))
     (isearch ((t (:background "yellow" :foreground "rgb:EE/66/00" :bold t))))
     (isearch-lazy-highlight-face ((t (:background "rgb:CC/FF/FF"
                                       :foreground "blue"
                                       :bold t)))) ;; for GNU Emacs
     (isearch-secondary ((t (:background "rgb:CC/FF/FF"
                             :foreground "blue"
                             :bold t)))) ;; for XEmacs

     ;; make
     (makefile-space-face ((t (:background "hotpink"))))

     ;; modeline
     (modeline-buffer-id ((t (:background "rgb:39/80/F4"
                              :foreground "white"))))
     (modeline-mousable ((t (:background "rgb:39/80/F4"
                             :foreground "gray85"))))  ;; major mode
     (modeline-mousable-minor-mode ((t (:background "rgb:39/80/F4"
                                        :foreground "gray75"))))

     (modeline ((t (:background "DeepSkyBlue1"
                    :foreground "black"
                    :height 1.25
                    :family "courier"))) t)

     (modeline-inactive ((t (:inherit modeline
                             :background  "PaleTurquoise1"
                             :foreground "grey20"
                             :box (:line-width -1 :color  "grey75")
                             :weight light
                             :family "profontwindows"))) t)

     ;; org
     (org-done ((t (:foreground "green3" :bold t :strike-through t))))
     (org-level-1 ((t (:foreground "blue" :bold t :height 1.3))))
     (org-level-2 ((t (:foreground "red" :bold t :height 1.1))))
     (org-level-3 ((t (:foreground "Purple"))))
     (org-scheduled-previously ((t (:foreground "blue" :bold t))))
     (org-scheduled-today ((t (:foreground "blue"))))
     (org-upcoming-deadline ((t (:foreground "DarkOrange" :bold t))))

     ;; selection
     (region ((t (:background "seashell2")))) ;; for GNU Emacs
     (zmacs-region ((t (:background "seashell2")))) ;; for XEmacs
     (secondary-selection ((t (:background "paleturquoise"))))

     ;; for cat <<EOF in shell scripts
     (sh-heredoc-face ((t (:foreground "gray50"))))

     ;; parentheses
     (paren-face-match ((t (:background "chartreuse" :bold t))))
     (paren-face-mismatch ((t (:background "purple" :foreground "white"
                               :bold t))))
     (paren-face-no-match ((t (:background "purple" :foreground "white"
                               :bold t))))
     (show-paren-match-face ((t (:background "chartreuse" :bold t))))
     (show-paren-mismatch-face ((t (:background "purple" :foreground "white"
                                    :bold t))))

     ;; shell
     (shell-prompt-face ((t (:bold t :foreground "yellow"))))
     (shell-option-face ((t (:foreground "forest green"))))
     (shell-output-face ((t (:foreground "black"))))
     (shell-output-2-face ((t (:foreground "blue"))))
     (shell-output-3-face ((t (:foreground "purple"))))

     ;; speedbar
     (speedbar-button-face ((t (:foreground "green4"))))
     (speedbar-directory-face ((t (:foreground "blue4"))))
     (speedbar-file-face ((t (:foreground "cyan4"))))
     (speedbar-highlight-face ((t (:background "green"))))
     (speedbar-selected-face ((t (:underline t :foreground "red"))))
     (speedbar-tag-face ((t (:foreground "brown"))))

     ;; tool-bar
     (tool-bar ((t (:background "grey75" :foreground "black" :box
                                (:line-width 1 :style released-button)))))

     ;; tooltip
     (tooltip ((t (:background "lightyellow" :foreground "black"))))

     ;; w3m
     (w3m-anchor-face ((t (:foreground "blue" :underline t))))
     (w3m-arrived-anchor-face ((t (:foreground "purple1" :underline t))))
     (w3m-bold-face ((t (:bold t :weight bold))))
     (w3m-current-anchor-face ((t (:foreground "blue" :bold t :underline t 
:weight bold))))
     (w3m-form-button-face ((t (:background "lightgrey" :foreground "black"))))
     (w3m-form-button-mouse-face ((t (:background "orange"))))
     (w3m-form-button-pressed-face ((t (:background "yellow"))))
     (w3m-form-face ((t (:foreground "green4" :underline t))))
     (w3m-header-line-location-content-face ((t (:foreground 
     (w3m-header-line-location-title-face ((t (:foreground "gainsboro"))))
     (w3m-history-current-url-face ((t (:background "SkyBlue4" :foreground 
     (w3m-image-face ((t (:foreground "PaleGreen"))))
     (w3m-strike-through-face ((t (:strike-through t))))
     (w3m-tab-background-face ((t (:background "rgb:21/36/4B"))))
     (w3m-tab-selected-face ((t (:background "Gray85" :foreground "black" :box 
(:line-width 1 :style nil)))))
     (w3m-tab-selected-retrieving-face ((t (:background "Gray85" :foreground 
"white" :box (:line-width -1 :style nil)))))
     (w3m-tab-unselected-face ((t (:background "Gray70" :foreground "Gray20" 
:box (:line-width 1 :style nil)))))
     (w3m-tab-unselected-retrieving-face ((t (:background "Gray50" :foreground 
"white" :box (:line-width -1 :style nil)))))
     (w3m-underline-face ((t (:underline t))))


(provide 'color-theme-sva)

;;; color-theme-sva.el ends here

Sébastien Vauban

reply via email to

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