[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master e29e2f5 2/3: image-dired: Delete commented out code
From: |
Stefan Kangas |
Subject: |
master e29e2f5 2/3: image-dired: Delete commented out code |
Date: |
Thu, 4 Nov 2021 20:14:17 -0400 (EDT) |
branch: master
commit e29e2f5776dfefae8b37478a034fe91447b4ca68
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
image-dired: Delete commented out code
* lisp/image-dired.el: Delete broken and commented out speedbar code;
it is not clear what, if anything, it is supposed to do. If anyone
wants to work on this, they are better off starting from scratch.
---
lisp/image-dired.el | 17 -----------------
1 file changed, 17 deletions(-)
diff --git a/lisp/image-dired.el b/lisp/image-dired.el
index 5c17b3c..ebedaee 100644
--- a/lisp/image-dired.el
+++ b/lisp/image-dired.el
@@ -2980,23 +2980,6 @@ Dired."
;; (setq dirsize (- dirsize (car (cdar files))))
;; (setq files (cdr files)))))
-;;;;;;;;;;;;;;;;;;;;;;,
-
-;; (defun dired-speedbar-buttons (dired-buffer)
-;; (when (and (boundp 'image-dired-use-speedbar)
-;; image-dired-use-speedbar)
-;; (let ((filename (with-current-buffer dired-buffer
-;; (dired-get-filename))))
-;; (when (and (not (string-equal filename (buffer-string)))
-;; (string-match (image-file-name-regexp) filename))
-;; (erase-buffer)
-;; (insert (propertize
-;; filename
-;; 'display
-;; (image-dired-get-thumbnail-image filename)))))))
-
-;; (setq image-dired-use-speedbar t)
-
(provide 'image-dired)
;;; image-dired.el ends here