Gnus development mailing list
 help / color / mirror / Atom feed
From: Katsumi Yamaoka <yamaoka@jpl.org>
To: Michael Ekstrand <michael@elehack.net>
Cc: bugs@gnus.org, ding@gnus.org
Subject: Re: Error viewing PGP/mime signed messages
Date: Tue, 18 Mar 2008 14:37:43 +0900	[thread overview]
Message-ID: <b4my78gr3rs.fsf@jpl.org> (raw)
In-Reply-To: <b4mr6e8siq1.fsf@jpl.org>

[-- Attachment #1: Type: text/plain, Size: 234 bytes --]

>>>>> Katsumi Yamaoka wrote:
> there is a serious bug in color-theme.el.

> --- color-theme.el~	2006-05-28 13:07:29 +0000
> +++ color-theme.el	2008-03-18 05:27:27 +0000

It will not work with XEmacs, sorry.  Please use this instead:


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 1157 bytes --]

--- color-theme.el~	2006-05-28 13:07:29 +0000
+++ color-theme.el	2008-03-18 05:33:06 +0000
@@ -73,9 +73,10 @@
   "Non-nil if running XEmacs.")
 
 ;; Add this since it appears to miss in emacs-2x
-(or (fboundp 'replace-in-string)
-    (defun replace-in-string (target old new)
-      (replace-regexp-in-string old new  target)))
+(if (fboundp 'replace-in-string)
+    (defalias 'color-theme-replace-in-string 'replace-in-string)
+  (defun color-theme-replace-in-string (target old new)
+    (replace-regexp-in-string old new  target)))
 
 ;; face-attr-construct has a problem in Emacs 20.7 and older when
 ;; dealing with inverse-video faces.  Here is a short test to check
@@ -1626,8 +1627,8 @@
        (add-to-list 'color-themes
                     (list ',n
                           (upcase-initials
-                           (replace-in-string
-                            (replace-in-string 
+                           (color-theme-replace-in-string
+                            (color-theme-replace-in-string 
                              (symbol-name ',n) "^color-theme-" "") "-" " "))
                           ,author))
        (defun ,n ()

  reply	other threads:[~2008-03-18  5:37 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
     [not found] <8763vlwggn.fsf@jehiel.elehack.net>
2008-03-18  5:29 ` Katsumi Yamaoka
2008-03-18  5:37   ` Katsumi Yamaoka [this message]
2008-03-18 14:10   ` Michael Ekstrand

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=b4my78gr3rs.fsf@jpl.org \
    --to=yamaoka@jpl.org \
    --cc=bugs@gnus.org \
    --cc=ding@gnus.org \
    --cc=michael@elehack.net \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).