From: | "Ulrich Mueller (ulm)" <ulm@g.o> |
---|---|
To: | gentoo-commits@l.g.o |
Subject: | [gentoo-commits] gentoo-x86 commit in app-emacs/slime/files: slime-changelog-date.patch |
Date: | Wed, 30 Jul 2008 09:12:33 |
Message-Id: | E1KO7jS-0004Mt-KI@stork.gentoo.org |
1 | ulm 08/07/30 09:12:30 |
2 | |
3 | Added: slime-changelog-date.patch |
4 | Log: |
5 | Extract date of last update from ChangeLog, fixes bug 233270. |
6 | (Portage version: 2.2_rc3/cvs/Linux 2.6.25-gentoo-r6 i686) |
7 | |
8 | Revision Changes Path |
9 | 1.1 app-emacs/slime/files/slime-changelog-date.patch |
10 | |
11 | file : http://sources.gentoo.org/viewcvs.py/gentoo-x86/app-emacs/slime/files/slime-changelog-date.patch?rev=1.1&view=markup |
12 | plain: http://sources.gentoo.org/viewcvs.py/gentoo-x86/app-emacs/slime/files/slime-changelog-date.patch?rev=1.1&content-type=text/plain |
13 | |
14 | Index: slime-changelog-date.patch |
15 | =================================================================== |
16 | --- slime-2.0_p20070816-old/slime.el 2008-07-30 10:37:28.000000000 +0200 |
17 | +++ slime-2.0_p20070816/slime.el 2008-07-30 10:39:53.000000000 +0200 |
18 | @@ -113,13 +113,7 @@ |
19 | (defun slime-changelog-date () |
20 | "Return the datestring of the latest entry in the ChangeLog file. |
21 | Return nil if the ChangeLog file cannot be found." |
22 | - (let ((changelog (concat slime-path "ChangeLog"))) |
23 | - (if (file-exists-p changelog) |
24 | - (with-temp-buffer |
25 | - (insert-file-contents changelog nil 0 100) |
26 | - (goto-char (point-min)) |
27 | - (symbol-name (read (current-buffer)))) |
28 | - nil)))) |
29 | + "@SLIME-CHANGELOG-DATE@")) |
30 | |
31 | (defvar slime-protocol-version nil) |
32 | (setq slime-protocol-version |