branch: elpa/pdf-tools commit 5563ac911466ee8948b76241d22c5c0e384b9ab4 Author: Vedang Manerikar <ved.maneri...@gmail.com> Commit: Vedang Manerikar <ved.maneri...@gmail.com>
Remove bugfix for imenu in Emacs 24.3 and below This is no longer necessary, since we are dropping support for Emacs 24.3 Relates to: #26 --- lisp/pdf-outline.el | 17 ----------------- 1 file changed, 17 deletions(-) diff --git a/lisp/pdf-outline.el b/lisp/pdf-outline.el index a9212b745d..fc75b02794 100644 --- a/lisp/pdf-outline.el +++ b/lisp/pdf-outline.el @@ -572,23 +572,6 @@ not call `imenu-sort-function'." (cons title (nconc (nreverse keep-at-top) menulist)))) -;; bugfix for imenu in Emacs 24.3 and below. -(when (condition-case nil - (progn (imenu--truncate-items '(("" 0))) nil) - (error t)) - (eval-after-load "imenu" - '(defun imenu--truncate-items (menulist) - "Truncate all strings in MENULIST to `imenu-max-item-length'." - (mapc (lambda (item) - ;; Truncate if necessary. - (when (and (numberp imenu-max-item-length) - (> (length (car item)) imenu-max-item-length)) - (setcar item (substring (car item) 0 imenu-max-item-length))) - (when (imenu--subalist-p item) - (imenu--truncate-items (cdr item)))) - menulist)))) - - (provide 'pdf-outline)