From: Stefan Kangas Date: Fri, 5 Nov 2021 00:06:38 +0000 (+0100) Subject: image-dired: Delete commented out code X-Git-Tag: emacs-29.0.90~3671^2~234 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e29e2f5776dfefae8b37478a034fe91447b4ca68;p=emacs.git 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. --- diff --git a/lisp/image-dired.el b/lisp/image-dired.el index 5c17b3c6818..ebedaee0102 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