emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/pdf-tools 5563ac9114 04/16: Remove bugfix for imenu in Ema


From: ELPA Syncer
Subject: [nongnu] elpa/pdf-tools 5563ac9114 04/16: Remove bugfix for imenu in Emacs 24.3 and below
Date: Tue, 29 Nov 2022 01:59:28 -0500 (EST)

branch: elpa/pdf-tools
commit 5563ac911466ee8948b76241d22c5c0e384b9ab4
Author: Vedang Manerikar <ved.manerikar@gmail.com>
Commit: Vedang Manerikar <ved.manerikar@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)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]