[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r113514: lisp/desktop.el (desktop-clear): Fix previo
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] trunk r113514: lisp/desktop.el (desktop-clear): Fix previous change. |
Date: |
Tue, 23 Jul 2013 23:11:07 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 113514
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Wed 2013-07-24 01:10:58 +0200
message:
lisp/desktop.el (desktop-clear): Fix previous change.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/desktop.el desktop.el-20091113204419-o5vbwnq5f7feedwu-591
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-07-23 14:06:02 +0000
+++ b/lisp/ChangeLog 2013-07-23 23:10:58 +0000
@@ -1,3 +1,7 @@
+2013-07-23 Juanma Barranquero <address@hidden>
+
+ * desktop.el (desktop-clear, desktop-list*): Fix previous change.
+
2013-07-23 Michael Albinus <address@hidden>
* net/tramp.el (tramp-handle-file-notify-add-watch): New defun.
=== modified file 'lisp/desktop.el'
--- a/lisp/desktop.el 2013-07-23 11:29:30 +0000
+++ b/lisp/desktop.el 2013-07-23 23:10:58 +0000
@@ -652,7 +652,7 @@
"\\)$")))
(dolist (buffer (buffer-list))
(let ((bufname (buffer-name buffer)))
- (unless (or (eq (aref bufname 0) ?s) ;; Don't kill internal buffers
+ (unless (or (eq (aref bufname 0) ?\s) ;; Don't kill internal buffers
(string-match-p preserve-regexp bufname))
(kill-buffer buffer)))))
(delete-other-windows))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r113514: lisp/desktop.el (desktop-clear): Fix previous change.,
Juanma Barranquero <=