From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/62080 Path: news.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.gnus.general,gmane.mail.mh-e.devel Subject: Re: image-load-path/load-path function Date: Fri, 24 Feb 2006 17:40:22 +0900 Organization: Emacsen advocacy group Message-ID: References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1140770489 28852 80.91.229.2 (24 Feb 2006 08:41:29 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 24 Feb 2006 08:41:29 +0000 (UTC) Cc: mh-e-devel@lists.sourceforge.net Original-X-From: ding-owner+m10608@lists.math.uh.edu Fri Feb 24 09:41:24 2006 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FCYVq-000624-00 for ding-account@gmane.org; Fri, 24 Feb 2006 09:41:19 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu ident=lists) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1FCYVm-00063Z-00; Fri, 24 Feb 2006 02:41:14 -0600 Original-Received: from nas01.math.uh.edu ([129.7.128.39]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1FCYV5-00063T-00 for ding@lists.math.uh.edu; Fri, 24 Feb 2006 02:40:31 -0600 Original-Received: from quimby.gnus.org ([80.91.224.244]) by nas01.math.uh.edu with esmtp (Exim 4.52) id 1FCYV4-0004Be-7c for ding@lists.math.uh.edu; Fri, 24 Feb 2006 02:40:31 -0600 Original-Received: from washington.hostforweb.net ([66.225.201.13]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1FCYV3-0005z3-00 for ; Fri, 24 Feb 2006 09:40:29 +0100 Original-Received: from [205.234.185.198] (port=51181 helo=mail.jpl.org) by washington.hostforweb.net with esmtpa (Exim 4.52) id 1FCYVb-00056L-1e; Fri, 24 Feb 2006 02:41:03 -0600 Original-To: ding@gnus.org X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.110004 (No Gnus v0.4) Emacs/21.1 (gnu/linux) Cancel-Lock: sha1:ouQNxB2hN5E23hv0RPByhd0HnVc= X-Hashcash: 1:20:060224:ding@gnus.org::IiSyvo3nrXcZ7sIY:00001yWL X-Hashcash: 1:20:060224:mh-e-devel@lists.sourceforge.net::ZsUETIyS6qM7APdu:000000000000000000000000000005IDZ X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - washington.hostforweb.net X-AntiAbuse: Original Domain - gnus.org X-AntiAbuse: Originator/Caller UID/GID - [47 12] / [47 12] X-AntiAbuse: Sender Address Domain - jpl.org X-Source: X-Source-Args: X-Source-Dir: X-Spam-Score: -2.5 (--) Precedence: bulk Original-Sender: ding-owner@lists.math.uh.edu Xref: news.gmane.org gmane.emacs.gnus.general:62080 gmane.mail.mh-e.devel:11743 Archived-At: >>>>> In Katsumi Yamaoka wrote: > Here's a modified part of gmm-utils.el... Sorry. The form under the line " ;; Return augmented `image-load-path' or `load-path'." should be replaced with the following to make Emacs 21 work. --8<---------------cut here---------------start------------->8--- ;; Return augmented `image-load-path' or `load-path'. (cond ((and path (symbolp path) (boundp path)) (if (eq gmm-image-load-path 'not-found) (copy-sequence (symbol-value path)) (nconc (list gmm-image-load-path) (delete gmm-image-load-path (copy-sequence (symbol-value path)))))) ((eq gmm-image-load-path 'not-found) (copy-sequence load-path)) (t (nconc (list gmm-image-load-path) (delete gmm-image-load-path (copy-sequence load-path)))))) --8<---------------cut here---------------end--------------->8---