punassuming / ranger.el

Bringing the goodness of ranger to dired!
699 stars 52 forks source link

Invalid function: evil-define-key #54

Closed ReneFroger closed 8 years ago

ReneFroger commented 8 years ago

Setup:

GUI version GNU Emacs 25.0.50.1 (x86_64-w64-mingw32) of 2015-07-25 on KAEL

Compiled from EmacsW64.

Ranger, using the latest version of ranger from MELPA

Windows 7 x64 bit.

Situation:

Empty init file and only Evil and Ranger. Evil is automatically enabled at startup. After starting, I call M-x ranger-mode, but I get the error "Invalid function: evil-define-key".

Any suggestion in order to debug this?

punassuming commented 8 years ago

Try the latest commit, if still having issues, send me the backtrace from debug on error.

ReneFroger commented 8 years ago

After upgrading Ranger, and starting Ranger, I got the error.

The backtrace from the debugger tells me the following:

    debugger entered--Lisp error: (void-variable ranger-override-dired)
    (if ranger-override-dired (progn (add-hook (quote dired-mode-hook) (quote ranger-override-dired-fn))))
    eval-buffer(#<buffer  *load*-363220> nil "c:/Users/junza/AppData/Roaming/.emacs.d/elpa/ranger-20151004.207/ranger-autoloads.el" nil t)  ; Reading at buffer position 493
    load-with-code-conversion("c:/Users/junza/AppData/Roaming/.emacs.d/elpa/ranger-20151004.207/ranger-autoloads.el" "c:/Users/junza/AppData/Roaming/.emacs.d/elpa/ranger-20151004.207/ranger-autoloads.el" nil t)
    load("c:/Users/junza/AppData/Roaming/.emacs.d/elpa/ranger-20151004.207/ranger-autoloads" nil t)
    package-activate-1([cl-struct-package-desc ranger (20151004 207) "Make dired more like ranger" ((emacs (24 4)) (cl-lib (0 5))) nil nil "c:/Users/junza/AppData/Roaming/.emacs.d/elpa/ranger-20151004.207" ((:keywords "files" "convenience") (:url . "https://github.com/ralesi/ranger") (:stars #("85" 0 2 (font-lock-face paradox-star-face)))) nil] nil)
    package-activate(ranger)
    package-initialize()
    eval-buffer(#<buffer  *load*> nil "c:/Users/junza/AppData/Roaming/.emacs" nil t)  ; Reading at buffer position 472
    load-with-code-conversion("c:/Users/junza/AppData/Roaming/.emacs" "c:/Users/junza/AppData/Roaming/.emacs" t t)
    load("~/.emacs" t t)
    #[0 "\205\262

Note that I use custom Evil keybindings for Dired itself. Not for Ranger.

punassuming commented 8 years ago

Ok, that was my bad, shouldn't have put a variable in an autoload without defining that as well. Will fix that tonight and then we can try again.

ReneFroger commented 8 years ago

I upgraded the ranger package. After enabling the ranger, the (very long!) backtrace of the error:

Debugger entered--Lisp error: (invalid-function evil-define-key)
evil-define-key(normal (keymap #^[nil nil keymap 
 #^^[3 0 nil nil nil nil nil nil nil nil (keymap (C-return . diredp-describe-file) (13 . diredp-describe-file)  (109 . diredp-describe-mode)) nil nil diredp-delete-this-file nil dired-find-file nil diredp-find-file-other-frame nil nil nil nil (keymap (73 . diredp-image-show-this-file) (101 . image-dired-dired-edit-comment-and-tags) (20 . image-dired-dired-toggle-marked-thumbs) (102 . image-dired-mark-tagged-files) (99 . image-dired-dired-comment-files) (46 . image-dired-display-thumb) (97 . image-dired-display-thumbs-append) (120 . image-dired-dired-display-external) (105 . image-dired-dired-display-image) (106 . image-dired-jump-thumbnail-buffer) (114 . image-dired-delete-tag) (116 . image-dired-tag-files) (100 . image-dired-display-thumbs)) nil nil nil (keymap (27 keymap (111 . dired-omit-mode))) nil nil (keymap (43 keymap (89 . diredp-do-relsymlink-recursive) (20 keymap (116 . diredp-image-dired-tag-files-recursive) (114 . diredp-image-dired-delete-tag-recursive) (100 . diredp-image-dired-display-thumbs-recursive) (99 . diredp-image-dired-comment-files-recursive)) (83 . diredp-do-symlink-recursive) (82 . diredp-do-move-recursive) (81 . diredp-do-query-replace-regexp-recursive) (80 . diredp-do-print-recursive) (77 . diredp-do-chmod-recursive) (72 . diredp-do-hardlink-recursive) (70 . diredp-do-find-marked-files-recursive) (68 . diredp-do-delete-recursive) (67 . diredp-do-copy-recursive) (65 . diredp-do-search-recursive) (27 keymap (119 . diredp-copy-filename-as-kill-recursive) (33554452 . diredp-do-touch-recursive) (115 keymap (97 keymap ... ...)) (12 . diredp-list-marked-recursive) (105 . diredp-insert-subdirs-recursive) (103 . diredp-do-grep-recursive) (33554434 . diredp-do-bookmark-in-bookmark-file-recursive) (2 . diredp-set-bookmark-file-bookmark-for-marked-recursive) (66 . diredp-do-bookmark-dirs-recursive) (98 . diredp-do-bookmark-recursive) (67108906 . diredp-marked-recursive-other-window)) (33 . diredp-do-shell-command-recursive) (38 . diredp-do-async-shell-command-recursive) (37 keymap (117 . diredp-upcase-recursive) (109 . diredp-mark-files-regexp-recursive) (108 . diredp-downcase-recursive) (99 . diredp-capitalize-recursive)) (58 keymap (118 . diredp-do-verify-recursive) (115 . diredp-do-sign-recursive) (101 . diredp-do-encrypt-recursive) (100 . diredp-do-decrypt-recursive)) (64 . diredp-do-apply-function-recursive)) (117 . diredp-upcase-this-file) (33554452 . dired-do-touch) (84 . diredp-touch-this-file) (112 . diredp-print-this-file) (15 . dired-display-file) (77 . diredp-chmod-this-file) (12 . diredp-list-marked) (108 . diredp-downcase-this-file) (105 . diredp-insert-subdirs) (99 . diredp-capitalize-this-file) (33554450 . diredp-toggle-find-file-reuse-dir) (103 . diredp-do-grep) (33554434 . diredp-do-bookmark-in-bookmark-file) (2 . diredp-set-bookmark-file-bookmark-for-marked) (98 . diredp-do-bookmark) (67108906 . diredp-marked-other-window) (71 . dired-goto-subdir) (33 . dired-smart-shell-command) (40 . dired-mark-sexp) (115 keymap (102 keymap (27 keymap (19 . dired-isearch-filenames-regexp)) (19 . dired-isearch-filenames)) (97 keymap (27 keymap (19 . dired-do-isearch-regexp)) (19 . dired-do-isearch))) (36 . dired-hide-subdir) (125 . dired-next-marked-file) (123 . dired-prev-marked-file) (16 . diredp-prev-subdir) (14 . diredp-next-subdir) (21 . dired-tree-up) (4 . dired-tree-down) (127 . dired-unmark-all-files)) nil nil nil nil diredp-next-line dired-do-shell-command nil dired-flag-auto-save-files diredp-hide-subdir-nomove (keymap (99 . diredp-capitalize) (89 . dired-do-relsymlink-regexp) (38 . dired-flag-garbage-files) (83 . dired-do-symlink-regexp) (82 . dired-do-rename-regexp) (72 . dired-do-hardlink-regexp) (67 . dired-do-copy-regexp) (114 . dired-do-rename-regexp) (109 . dired-mark-files-regexp) (103 . dired-mark-files-containing-regexp) (100 . dired-flag-files-regexp) (108 . dired-downcase) (117 . dired-upcase)) dired-do-async-shell-command nil dired-hide-details-mode nil (keymap (46 . diredp-mark/unmark-extension) (40 . dired-mark-sexp) (79 . dired-mark-omitted) (116 . dired-toggle-marks) (16 . dired-prev-marked-file) (14 . dired-next-marked-file) (127 . dired-unmark-backward) (33 . dired-unmark-all-marks) (63 . dired-unmark-all-files) (117 . dired-unmark) (109 . dired-mark) (115 . dired-mark-subdir-files) (99 . dired-change-marks) (37 . dired-mark-files-regexp) (64 . dired-mark-symlinks) (47 . dired-mark-directories) (42 . dired-mark-executables)) dired-create-directory nil nil dired-clean-directory (keymap (76 . dired-filter-load-saved-filters) (65 . dired-filter-add-saved-filters) (68 . dired-filter-delete-saved-filters) (83 . dired-filter-save-filters) (47 . dired-filter-pop-all) (112 . dired-filter-pop) (9 . dired-filter-transpose) (42 . dired-filter-decompose) (33 . dired-filter-negate) (124 . dired-filter-or) (120 . dired-filter-by-executable) (115 . dired-filter-by-symlink) (109 . dired-filter-by-mode) (100 . dired-filter-by-directory) (102 . dired-filter-by-file) (101 . dired-filter-by-predicate) (103 . dired-filter-by-garbage) (111 . dired-filter-by-omit) (104 . dired-filter-by-dot-files) (46 . dired-filter-by-extension) (114 . dired-filter-by-regexp) (110 . dired-filter-by-name)) nil ...] #^^[1 0 #^^[2 0 
#^^[3 0 nil nil nil nil nil nil nil nil (keymap (C-return . diredp-describe-file) (13 . diredp-describe-file) (109 . diredp-describe-mode)) nil nil diredp-delete-this-file nil dired-find-file nil diredp-find-file-other-frame nil nil nil nil (keymap (73 . diredp-image-show-this-file) (101 . image-dired-dired-edit-comment-and-tags) (20 . image-dired-dired-toggle-marked-thumbs) (102 . image-dired-mark-tagged-files) (99 . image-dired-dired-comment-files) (46 . image-dired-display-thumb) (97 . image-dired-display-thumbs-append) (120 . image-dired-dired-display-external) (105 . image-dired-dired-display-image) (106 . image-dired-jump-thumbnail-buffer) (114 . image-dired-delete-tag) (116 . image-dired-tag-files) (100 . image-dired-display-thumbs)) nil nil nil (keymap (27 keymap (111 . dired-omit-mode))) nil nil (keymap (43 keymap (89 . diredp-do-relsymlink-recursive) (20 keymap ... ... ... ...) (83 . diredp-do-symlink-recursive) (82 . diredp-do-move-recursive) (81 . diredp-do-query-replace-regexp-recursive) (80 . diredp-do-print-recursive) (77 . diredp-do-chmod-recursive) (72 . diredp-do-hardlink-recursive) (70 . diredp-do-find-marked-files-recursive) (68 . diredp-do-delete-recursive) (67 . diredp-do-copy-recursive) (65 . diredp-do-search-recursive) (27 keymap ... ... ... ... ... ... ... ... ... ... ...) (33 . diredp-do-shell-command-recursive) (38 . diredp-do-async-shell-command-recursive) (37 keymap ... ... ... ...) (58 keymap ... ... ... ...) (64 . diredp-do-apply-function-recursive)) (117 . diredp-upcase-this-file) (33554452 . dired-do-touch) (84 . diredp-touch-this-file) (112 . diredp-print-this-file) (15 . dired-display-file) (77 . diredp-chmod-this-file) (12 . diredp-list-marked) (108 . diredp-downcase-this-file) (105 . diredp-insert-subdirs) (99 . diredp-capitalize-this-file) (33554450 . diredp-toggle-find-file-reuse-dir) (103 . diredp-do-grep) (33554434 . diredp-do-bookmark-in-bookmark-file) (2 . diredp-set-bookmark-file-bookmark-for-marked) (98 . diredp-do-bookmark) (67108906 . diredp-marked-other-window) (71 . dired-goto-subdir) (33 . dired-smart-shell-command) (40 . dired-mark-sexp) (115 keymap (102 keymap ... ...) (97 keymap ... ...)) (36 . dired-hide-subdir) (125 . dired-next-marked-file) (123 . dired-prev-marked-file) (16 . diredp-prev-subdir) (14 . diredp-next-subdir) (21 . dired-tree-up) (4 . dired-tree-down) (127 . dired-unmark-all-files)) nil nil nil nil diredp-next-line dired-do-shell-command nil dired-flag-auto-save-files diredp-hide-subdir-nomove (keymap (99 . diredp-capitalize) (89 . dired-do-relsymlink-regexp) (38 . dired-flag-garbage-files) (83 . dired-do-symlink-regexp) (82 . dired-do-rename-regexp) (72 . dired-do-hardlink-regexp) (67 . dired-do-copy-regexp) (114 . dired-do-rename-regexp) (109 . dired-mark-files-regexp) (103 . dired-mark-files-containing-regexp) (100 . dired-flag-files-regexp) (108 . dired-downcase) (117 . dired-upcase)) dired-do-async-shell-command nil dired-hide-details-mode nil (keymap (46 . diredp-mark/unmark-extension) (40 . dired-mark-sexp) (79 . dired-mark-omitted) (116 . dired-toggle-marks) (16 . dired-prev-marked-file) (14 . dired-next-marked-file) (127 . dired-unmark-backward) (33 . dired-unmark-all-marks) (63 . dired-unmark-all-files) (117 . dired-unmark) (109 . dired-mark) (115 . dired-mark-subdir-files) (99 . dired-change-marks) (37 . dired-mark-files-regexp) (64 . dired-mark-symlinks) (47 . dired-mark-directories) (42 . dired-mark-executables)) dired-create-directory nil nil dired-clean-directory (keymap (76 . dired-filter-load-saved-filters) (65 . dired-filter-add-saved-filters) (68 . dired-filter-delete-saved-filters) (83 . dired-filter-save-filters) (47 . dired-filter-pop-all) (112 . dired-filter-pop) (9 . dired-filter-transpose) (42 . dired-filter-decompose) (33 . dired-filter-negate) (124 . dired-filter-or) (120 . dired-filter-by-executable) (115 . dired-filter-by-symlink) (109 . dired-filter-by-mode) (100 . dired-filter-by-directory) (102 . dired-filter-by-file) (101 . dired-filter-by-predicate) (103 . dired-filter-by-garbage) (111 . dired-filter-by-omit) (104 . dired-filter-by-dot-files) (46 . dired-filter-by-extension) (114 . dired-filter-by-regexp) (110 . dired-filter-by-name)) nil ...] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...] (f2 . dired-efap) (down-mouse-1 . dired-efap-click) (key-chord keymap (121 keymap (121 . dired-ranger-copy)) (115 keymap (115 . wdired-finish-edit))) (visual-state keymap "Auxiliary keymap for Visual state" (109 . dired-mark)) (deleteline . diredp-delete-this-file) (33554434 . diredp-bookmark-this-file) (help keymap (109 . diredp-describe-mode)) (f1 keymap (109 . diredp-describe-mode)) (M-mouse-2 . diredp-mouse-find-file-other-frame) (S-mouse-2 . ignore) (S-down-mouse-2 . diredp-mouse-find-file) (S-mouse-1 . diredp-mouse-mark-region-files) (S-down-mouse-1 . ignore) (mouse-3 . ignore) (down-mouse-3 . diredp-mouse-3-menu) (backspace . diredp-up-directory) (normal-state keymap "Auxiliary keymap for Normal state" (112 . dired-ranger-paste) (77 . dired-ranger-move) (103 keymap (102 . ergoemacs-open-in-desktop)) (115 . Ernst/xah-dired-sort) (101 . dired-toggle-read-only) (99 . dired-create-directory) (86 . set-mark-command) (32 . own-scroll-up-half) (backspace lambda nil (interactive) (find-alternate-file "..")) (59 . dired-find-alternate-file) (114 . dired-do-redisplay) (75 . dired-do-kill-lines) (74 . dired-goto-file) (58 . evil-ex) (108 . evil-forward-char) (107 . evil-previous-line) (106 . evil-next-line) (104 . evil-backward-char)) (override-state . normal) (menu-bar keymap (help-menu keymap (describe keymap (describe-mode menu-item "Describe Buffer Modes" diredp-describe-mode :help "Describe this buffer's major and minor mode"))) (subdir "Dir" keymap (revert menu-item "Refresh (Sync & Show All)" revert-buffer :help "Update directory contents") (diredp-highlight-autofiles-mode menu-item "Toggle Autofile Highlighting" diredp-highlight-autofiles-mode :help "Toggle whether to highlight autofile bookmarks" :visible (and (featurep (quote bookmark+)) (featurep (quote highlight)))) (dired menu-item "Dired (Filter via Wildcards)..." dired :help "Explore a directory (you can provide wildcards)") (diredp-marked menu-item "Dired Marked Files" diredp-marked :enable (save-excursion (goto-char (point-min)) (and (re-search-forward (dired-marker-regexp) nil t) (re-search-forward (dired-marker-regexp) nil t))) :help "Open Dired on marked files only") (diredp-marked-other-window menu-item "Dired Marked Files in Other Window" diredp-marked-other-window :enable (save-excursion (goto-char (point-min)) (and (re-search-forward (dired-marker-regexp) nil t) (re-search-forward (dired-marker-regexp) nil t))) :help "Open Dired on marked files only, in other window") (diredp-fileset-other-window menu-item "Dired Fileset..." diredp-fileset-other-window :enable (> emacs-major-version 21) :help "Open Dired on an Emacs fileset") (diredp-dired-union menu-item "Dired Union..." diredp-dired-union :help "Open Dired for the union of some existing Dired buffers") (diredp-add-to-this-dired-buffer menu-item "Add Entries Here..." diredp-add-to-this-dired-buffer :help "Add individual file and directory names to the listing" :keys "C-x E") (diredp-dired-inserted-subdirs menu-item "Dired Each Inserted Subdir..." diredp-dired-inserted-subdirs :enable (cdr dired-subdir-alist) :help "Open Dired for each of the inserted subdirectories") (diredp-dired-recent-dirs menu-item "Dired Recent Directories..." diredp-dired-recent-dirs :visible (boundp (quote recentf-list)) :enable (and (boundp (quote recentf-list)) (consp recentf-list)) :help "Open a Dired buffer for recently used directories") (separator-dired-on-set "--") (create-directory menu-item "New Directory..." dired-create-directory :help "Create a directory") (bookmark-dired menu-item "Bookmark Dired Buffer..." bookmark-set :help "Bookmark this Dired buffer") (diredp-do-bookmark-dirs-recursive menu-item "Bookmark Dirs Here and Below..." diredp-do-bookmark-dirs-recursive :help "Bookmark this Dired buffer and marked subdirectory Dired buffers, recursively.") (compare-directories menu-item "Compare Directories..." dired-compare-directories :help "Mark files with different attributes in two Dired buffers") (wdired-mode menu-item "Edit File Names (WDired)" wdired-change-to-wdired-mode :help "Put a Dired buffer in a mode in which filenames are editable" :keys "C-x C-q" :filter (lambda (x) (and (derived-mode-p (quote dired-mode)) x))) (isearch-filenames menu-item "Isearch in File Names..." dired-isearch-filenames :help "Incrementally search for literal text in file names only.") (isearch-filenames-regexp menu-item "Isearch Regexp in File Names..." dired-isearch-filenames-regexp :help "Incrementally search for regexp in file names only") (image-dired-dired-toggle-marked-thumbs menu-item "Toggle Image Thumbnails" image-dired-dired-toggle-marked-thumbs :enable (fboundp (quote image-dired-dired-toggle-marked-thumbs)) :help "Add or remove image thumbnails in front of marked file names") (separator-subdir "--") (insert menu-item "This Subdir" dired-maybe-insert-subdir :help "Move to subdirectory line or listing") (next-dirline menu-item "Next Dirline" diredp-next-dirline :help "Move to next directory-file line") (prev-dirline menu-item "Prev Dirline" diredp-prev-dirline :help "Move to previous directory-file line") (next-subdir menu-item "Next Subdir" diredp-next-subdir :help "Go to next subdirectory header line") (prev-subdir menu-item "Prev Subdir" diredp-prev-subdir :help "Go to previous subdirectory header line") (up menu-item "Up Directory" diredp-up-directory :help "Dired the parent directory") (tree-up menu-item "Tree Up" dired-tree-up :help "Go to first subdirectory header up the tree") (tree-down menu-item "Tree Down" dired-tree-down :help "Go to first subdirectory header down the tree") (hide-subdir menu-item "Hide/Show Subdir" diredp-hide-subdir-nomove :help "Hide or unhide current directory listing") (hide-all menu-item "Hide/Show All Subdirs" dired-hide-all :help "Hide all subdirectories, leave only header lines") (hide-details menu-item "Hide/Show Details" dired-hide-details-mode :help "Hide or show less important fields of directory listing") (dired-omit-mode menu-item "Hide/Show Uninteresting (Omit Mode)" dired-omit-mode :help "Toggle omission of uninteresting files (Omit mode)") "Dir") (mark "Mark" keymap (unmark menu-item "Unmark" dired-unmark :help "Unmark or unflag current line's file") (unmark-region menu-item "Unmark Region" diredp-unmark-region-files :enable (diredp-nonempty-region-p) :help "Unmark all files in the region (selection)") (unmark-with menu-item "Unmark Marked-With..." dired-unmark-all-files :help "Remove a specific mark (or all marks) from every file") (unmark-all menu-item "Unmark All" dired-unmark-all-marks :help "Remove all marks from all files") (separator-unmark "--") (mark menu-item "Mark" dired-mark :help "Mark current line's file for future operations") (mark-region menu-item "Mark Region" diredp-mark-region-files :enable (diredp-nonempty-region-p) :help "Mark all of the files in the region (selection)") (executables menu-item "Mark Executables" dired-mark-executables :help "Mark all executable files") (directory menu-item "Mark Old Backups" dired-clean-directory :help "Flag old numbered backups for deletion") (directories menu-item "Mark Directories" dired-mark-directories :help "Mark all directories except `.' and `..'") (symlinks menu-item "Mark Symlinks" dired-mark-symlinks :visible (fboundp (quote make-symbolic-link)) :help "Mark all symbolic links") (mark-extension menu-item "Mark Extension..." diredp-mark/unmark-extension :help "Mark all files with specified extension") (mark-omitted menu-item "Mark Omitted..." dired-mark-omitted :help "Mark all omitted files and subdirectories") (mark-sexp menu-item "Mark If..." dired-mark-sexp :help "Mark files for which specified condition is true") (separator-mark "--") (toggle-marks menu-item "Toggle Marked/Unmarked" dired-toggle-marks :help "Mark unmarked files, unmark marked ones") (omit-marked menu-item "Omit Marked" diredp-omit-marked :help "Hide lines of marked files") (omit-unmarked menu-item "Omit Unmarked" diredp-omit-unmarked :help "Hide lines of unmarked files") (marks menu-item "Change Marks..." dired-change-marks :help "Replace marker with another character") (next menu-item "Next Marked" dired-next-marked-file :help "Move to next marked file") (prev menu-item "Previous Marked" dired-prev-marked-file :help "Move to previous marked file") (separator-flag "--") (deletion menu-item "Flag" dired-flag-file-deletion :help "Flag current line's file for deletion") (flag-region menu-item "Flag Region" diredp-flag-region-files-for-deletion :enable (diredp-nonempty-region-p) :help "Flag all files in the region (selection) for deletion") (auto-save-files menu-item "Flag Auto-save Files" dired-flag-auto-save-files :help "Flag auto-save files for deletion") (backup-files menu-item "Flag Backup Files" dired-flag-backup-files :help "Flag all backup files for deletion") (garbage-files menu-item "Flag Garbage Files" dired-flag-garbage-files :help "Flag unneeded files for deletion") (flag-extension menu-item "Flag Extension..." dired-flag-extension :help "Flag all files that have a certain extension, for deletion") "Mark") (regexp "Regexp" keymap (mark-recursive "Here and Below" keymap (diredp-mark-files-regexp-recursive menu-item "Mark..." diredp-mark-files-regexp-recursive :help "Mark all files matching a regexp, including those in marked subdirs") "Here and Below") (mark menu-item "Mark..." dired-mark-files-regexp :help "Mark files matching regexp for future operations") (mark-cont menu-item "Mark Containing..." dired-mark-files-containing-regexp :help "Mark files whose contents matches regexp") (image-dired-mark-tagged-files menu-item "Mark Image Files Tagged..." image-dired-mark-tagged-files :enable (fboundp (quote image-dired-mark-tagged-files)) :help "Mark image files whose image tags match regexp") (flag menu-item "Flag..." dired-flag-files-regexp :help "Flag files matching regexp for deletion") (rename menu-item "Move to..." dired-do-rename-regexp :help "Move marked files matching regexp") (copy menu-item "Copy to..." dired-do-copy-regexp :help "Copy marked files matching regexp") (relsymlink menu-item "Symlink to (Relative)..." dired-do-relsymlink-regexp :visible (fboundp (quote make-symbolic-link)) :help "Make relative symbolic links for files matching regexp") (symlink menu-item "Symlink to (Absolute)..." dired-do-symlink-regexp :visible (fboundp (quote make-symbolic-link)) :help "Make absolute symbolic links for files matching regexp") (hardlink menu-item "Hardlink to..." dired-do-hardlink-regexp :help "Make hard links for files matching regexp") "Regexp") (operate "Multiple" keymap (operate-recursive "Marked Here and Below" keymap (bookmarks "Bookmark" keymap (diredp-do-bookmark-recursive menu-item "Bookmark..." diredp-do-bookmark-recursive :help "Bookmark the marked files, including those in marked subdirs") (diredp-do-bookmark-dirs-recursive menu-item "Bookmark Dirs..." diredp-do-bookmark-dirs-recursive :help "Bookmark this Dired buffer and marked subdirectory Dired buffers, recursively.") (diredp-set-bookmark-file-bookmark-for-marked-recursive menu-item "Create Bookmark-File Bookmark..." diredp-set-bookmark-file-bookmark-for-marked-recursive :help "Create a bookmark-file bookmark for marked files, including in marked subdirs") (diredp-do-bookmark-in-bookmark-file-recursive menu-item "Bookmark in Bookmark File..." diredp-do-bookmark-in-bookmark-file-recursive :help "Bookmark marked files, including those in marked subdirs, in a bookmark file") "Bookmark") (search "Search" keymap (diredp-do-grep-recursive menu-item "Grep..." diredp-do-grep-recursive :help "Run `grep' on the marked files, including those in marked subdirs") (diredp-do-search-recursive menu-item "Search Files..." diredp-do-search-recursive :help "Regexp search marked files, including those in marked subdirs") (diredp-do-query-replace-regexp-recursive menu-item "Query Replace..." diredp-do-query-replace-regexp-recursive :help "Replace regexp in marked files, including those in marked subdirs") (diredp-do-isearch-recursive menu-item "Isearch Files..." diredp-do-isearch-recursive :help "Incrementally search marked files, including those in marked subdirs") (diredp-do-isearch-regexp-recursive menu-item "Isearch Regexp Files..." diredp-do-isearch-regexp-recursive :help "Incrementally regexp search marked files, including those in marked subdirs") "Search") (encryption "Encryption" keymap (diredp-do-encrypt-recursive menu-item "Encrypt..." diredp-do-encrypt-recursive :help "Encrypt marked files, including those in marked subdirs") (diredp-do-sign-recursive menu-item "Sign..." diredp-do-sign-recursive :help "Sign marked files, including those in marked subdirs") (diredp-do-verify-recursive menu-item "Verify..." diredp-do-verify-recursive :help "Verify marked files, including those in marked subdirs") (diredp-do-decrypt-recursive menu-item "Decrypt..." diredp-do-decrypt-recursive :help "Decrypt marked files, including those in marked subdirs") "Encryption") (images menu-item "Images" diredp-menu-bar-images-recursive-menu :enable (fboundp (quote image-dired-delete-tag))) (diredp-do-find-marked-files-recursive menu-item "Open" diredp-do-find-marked-files-recursive :help "Find marked files simultaneously, including those in marked subdirs") (diredp-marked-recursive menu-item "Dired (Marked)" diredp-marked-recursive :help "Open Dired on marked files, including those in marked subdirs") (diredp-marked-recursive-other-window menu-item "Dired (Marked) in Other Window" diredp-marked-recursive-other-window :help "Open Dired (in other window) on marked files, including those in marked subdirs") (separator-dirs "--") (diredp-insert-subdirs-recursive menu-item "Insert Subdirs" diredp-insert-subdirs-recursive :help "Insert the marked subdirectories, gathered recursively") (diredp-copy-filename-as-kill-recursive menu-item "Copy File Names (to Paste)" diredp-copy-filename-as-kill-recursive :help "Copy names of files marked here and in marked subdirs, to `kill-ring'") (diredp-list-marked-recursive menu-item "List Marked Files" diredp-list-marked-recursive :help "List the files marked here and in marked subdirs, recursively") (separator-lettercase "--") (diredp-upcase-recursive menu-item "Upcase" diredp-upcase-recursive :enable (or (not (fboundp ...)) (msdos-long-file-names)) :help "Rename marked files, including in marked subdirs, to uppercase names") (diredp-downcase-recursive menu-item "Downcase" diredp-downcase-recursive :enable (or (not (fboundp ...)) (msdos-long-file-names)) :help "Rename marked files, including in marked subdirs, to lowercase names") (diredp-capitalize-recursive menu-item "Capitalize" diredp-capitalize-recursive :enable (or (not (fboundp ...)) (msdos-long-file-names)) :help "Capitalize the names of all marked files, including in marked subdirs") (separator-copy-move "--") (diredp-do-move-recursive menu-item "Move to..." diredp-do-move-recursive :help "Move marked files, including in marked subdirs, to a given directory") (diredp-do-copy-recursive menu-item "Copy to..." diredp-do-copy-recursive :help "Copy marked files, including in marked subdirs, to a given directory") (diredp-do-relsymlink-recursive menu-item "Symlink to (Relative)..." diredp-do-relsymlink-recursive :help "Make relative symbolic links for marked files, including those in marked subdirs") (diredp-do-symlink-recursive menu-item "Symlink to (Absolute)..." diredp-do-symlink-recursive :help "Make absolute symbolic links for marked files, including those in marked subdirs") (diredp-do-hardlink-recursive menu-item "Hardlink to..." diredp-do-hardlink-recursive :help "Make hard links for marked files, including those in marked subdirs") (separator-delete "--") (diredp-do-delete-recursive menu-item "Delete Marked (not Flagged)" diredp-do-delete-recursive :help "Delete marked (not flagged) files, including in marked subdirs") (separator-misc "--") (diredp-do-print-recursive menu-item "Print..." diredp-do-print-recursive :help "Print the marked files, including those in marked subdirs") (diredp-do-apply-function-recursive menu-item "Apply Lisp Function..." diredp-do-apply-function-recursive :help "Apply a Lisp function to the marked files, including those in marked subdirs") (diredp-do-shell-command-recursive menu-item "Shell Command..." diredp-do-shell-command-recursive :help "Run shell command on the marked files, including those in marked subdirs") (diredp-do-async-shell-command-recursive menu-item "Asynchronous Shell Command..." diredp-do-async-shell-command-recursive :help "Run shell command asynchronously on marked files, including in marked subdirs") (separator-change "--") (touch menu-item "Change Timestamp (`touch')..." diredp-do-touch-recursive :help "Change timestamp of marked files, including those in marked subdirs") (chmod menu-item "Change Mode..." diredp-do-chmod-recursive :help "Change mode (attributes) of marked files, including those in marked subdirs") "Marked Here and Below") (bookmark "Bookmark" keymap (diredp-do-bookmark menu-item "Bookmark..." diredp-do-bookmark :help "Bookmark the marked or next N files") (diredp-set-bookmark-file-bookmark-for-marked menu-item "Create Bookmark-File Bookmark..." diredp-set-bookmark-file-bookmark-for-marked :help "Create a bookmark-file bookmark, and bookmark the marked files in it") (diredp-do-bookmark-in-bookmark-file menu-item "Bookmark in Bookmark File..." diredp-do-bookmark-in-bookmark-file :help "Bookmark the marked files in BOOKMARK-FILE and save BOOKMARK-FILE") (separator-book-1 "--") (diredp-do-bookmark-recursive menu-item "Bookmark (Here and Below)..." diredp-do-bookmark-recursive :help "Bookmark the marked files, including those in marked subdirs") (diredp-do-bookmark-dirs-recursive menu-item "Bookmark Dirs (Here and Below)..." diredp-do-bookmark-dirs-recursive :help "Bookmark this Dired buffer and marked subdirectory Dired buffers, recursively.") (diredp-set-bookmark-file-bookmark-for-marked-recursive menu-item "Create Bookmark-File Bookmark (Here and Below)..." diredp-set-bookmark-file-bookmark-for-marked-recursive :help "Create a bookmark-file bookmark for marked files, including in marked subdirs") (diredp-do-bookmark-in-bookmark-file-recursive menu-item "Bookmark in Bookmark File (Here and Below)..." diredp-do-bookmark-in-bookmark-file-recursive :help "Bookmark marked files (including in marked subdirs) in bookmark file and save it") "Bookmark") (search "Search" keymap (grep menu-item "Grep..." diredp-do-grep :help "Grep marked, next N, or all files shown") (search menu-item "Search Files..." dired-do-search :help "Search marked files for regexp") (query-replace menu-item "Query Replace..." dired-do-query-replace-regexp :help "Replace regexp in marked files") (isearch menu-item "Isearch Files..." dired-do-isearch :help "Incrementally search marked files for string") (isearch-regexp menu-item "Isearch Regexp Files..." dired-do-isearch-regexp :help "Incrementally search marked files for regexp") "Search") (epa-dired-do-encrypt) (epa-dired-do-sign) (epa-dired-do-verify) (epa-dired-do-decrypt) (encryption "Encryption" keymap (epa-dired-do-encrypt menu-item "Encrypt..." epa-dired-do-encrypt :help "Encrypt the marked files") (epa-dired-do-sign menu-item "Sign..." epa-dired-do-sign :help "Sign the marked files") (epa-dired-do-verify menu-item "Verify..." epa-dired-do-verify :help "Verify the marked files") (epa-dired-do-decrypt menu-item "Decrypt..." epa-dired-do-decrypt :help "Decrypt the marked files") "Encryption") (image-dired-display-thumbs) (image-dired-dired-comment-files) (image-dired-tag-files) (image-dired-delete-tag) (images menu-item "Images" diredp-menu-bar-images-menu :enable (fboundp (quote image-dired-display-thumbs))) (find-files menu-item "Open" dired-do-find-marked-files :help "Open each marked file for editing") (diredp-marked menu-item "Dired (Marked)" diredp-marked :enable (save-excursion (goto-char (point-min)) (and (re-search-forward (dired-marker-regexp) nil t) (re-search-forward (dired-marker-regexp) nil t))) :help "Open Dired on marked files only") (diredp-marked-other-window menu-item "Dired (Marked) in Other Window" diredp-marked-other-window :enable (save-excursion (goto-char (point-min)) (and (re-search-forward (dired-marker-regexp) nil t) (re-search-forward (dired-marker-regexp) nil t))) :help "Open Dired on marked files only, in other window") (diredp-insert-subdirs menu-item "Insert Subdirs" diredp-insert-subdirs :help "Insert the marked subdirectories - like using `i' at each marked dir") (diredp-list-marked menu-item "List Marked Files" diredp-list-marked :help "List the files marked here (C-u C-u: all, C-u C-u C-u: all + dirs)") (kill-ring menu-item "Copy File Names (to Paste)" dired-copy-filename-as-kill :help "Copy names of marked files onto kill ring, for pasting") (separator-lettercase "--") (upcase menu-item "Upcase" dired-upcase :enable (or (not (fboundp (quote msdos-long-file-names))) (msdos-long-file-names)) :help "Rename marked files to uppercase names") (downcase menu-item "Downcase" dired-downcase :enable (or (not (fboundp (quote msdos-long-file-names))) (msdos-long-file-names)) :help "Rename marked files to lowercase names") (capitalize menu-item "Capitalize" diredp-capitalize :help "Capitalize (initial caps) the names of all marked files") (separator-rename "--") (rename menu-item "Move to..." dired-do-rename :help "Rename current file or move marked files") (copy menu-item "Copy to..." dired-do-copy :help "Copy current file or all marked files") (relsymlink menu-item "Symlink to (Relative)..." dired-do-relsymlink :help "Make relative symbolic links for current or marked files") (symlink menu-item "Symlink to (Absolute)..." dired-do-symlink :help "Make absolute symbolic links for current or marked files") (hardlink menu-item "Hardlink to..." dired-do-hardlink :help "Make hard links for current or marked files") (separator-delete "--") (delete menu-item "Delete Marked (not Flagged)" dired-do-delete :help "Delete current file or all marked files (not flagged files)") (delete-flagged menu-item "Delete Flagged" dired-do-flagged-delete :help "Delete all files flagged for deletion (D)") (separator-misc "--") (print menu-item "Print..." dired-do-print :help "Print marked files, supplying print command") (diredp-do-apply-function menu-item "Apply Lisp Function..." diredp-do-apply-function :help "Apply a Lisp function to each marked file name (`C-u': file contents, not name)") (compress menu-item "Compress/Uncompress" dired-do-compress :help "Compress/uncompress marked files") (command menu-item "Shell Command..." dired-do-shell-command :help "Run a shell command on each marked file") (async-command menu-item "Asynchronous Shell Command..." dired-do-async-shell-command :help "Run a shell command asynchronously on each marked file") (compile menu-item "Byte Compile" dired-do-byte-compile :help "Byte-compile marked Emacs Lisp files") (load menu-item "Load" dired-do-load :help "Load marked Emacs Lisp files") (separator-change "--") (touch menu-item "Change Timestamp (`touch')..." dired-do-touch :help "Change the timestamp of the marked files, using `touch'") (chmod menu-item "Change Mode..." dired-do-chmod :help "Change mode (attributes) of marked files") "Multiple") (immediate "Single" keymap (diredp-bookmark-this-file menu-item "Bookmark..." diredp-bookmark-this-file :help "Bookmark the file at cursor") (encryption "Encryption" keymap (diredp-encrypt-this-file menu-item "Encrypt..." (lambda nil (interactive) (epa-encrypt-file (expand-file-name ...) (epa-select-keys ... "Select recipients for encryption.\nIf no one is selected, symmetric encryption will be performed.  " nil t))) :help "Sign this file") (diredp-sign-this-file menu-item "Sign..." (lambda nil (interactive) (epa-sign-file (expand-file-name ...) (epa-select-keys ... "Select keys for signing.\nIf no one is selected, default secret key is used.  " nil t))) :help "Encrypt this file") (diredp-verify-this-file menu-item "Verify..." (lambda nil (interactive) (epa-verify-file (expand-file-name ...))) :help "Verify this file") (diredp-decrypt-this-file menu-item "Decrypt..." (lambda nil (interactive) (epa-decrypt-file (expand-file-name ...))) :help "Decrypt this file") "Encryption") (image menu-item "Image" diredp-menu-bar-immediate-image-menu :enable (let ((img-file (diredp-get-image-filename ... ...))) (and (fboundp (quote image-dired-dired-display-image)) img-file))) (find-file menu-item "Open" dired-find-file :help "Edit file at cursor") (find-file-other-window menu-item "Open in Other Window" dired-find-file-other-window :help "Edit file at cursor in a different window") (find-file-other-frame menu-item "Open in Other Frame" diredp-find-file-other-frame :help "Edit file at cursor in a different frame") (display menu-item "Display in Other Window" dired-display-file :help "Display file at cursor in a different window") (view menu-item "View (Read Only)" dired-view-file :help "Examine file at cursor in read-only mode") (separator-subdir "--" :visible (or (atom (diredp-this-subdir)) (not (equal (expand-file-name ...) (expand-file-name default-directory))))) (goto-subdir menu-item "Go To Inserted Subdir" dired-maybe-insert-subdir :visible (and (atom (diredp-this-subdir)) (assoc (file-name-as-directory (diredp-this-subdir)) dired-subdir-alist)) :enable (atom (diredp-this-subdir)) :help "Go to the inserted listing of this subdirectory") (insert-subdir menu-item "Insert This Subdir" dired-maybe-insert-subdir :visible (and (atom (diredp-this-subdir)) (not (assoc (file-name-as-directory ...) dired-subdir-alist))) :enable (atom (diredp-this-subdir)) :help "Insert a listing of this subdirectory") (diredp-dired-this-subdir menu-item "Dired This Inserted Subdir (Tear Off)" (lambda nil (interactive) (diredp-dired-this-subdir t)) :visible (and (cdr dired-subdir-alist) (not (equal (expand-file-name ...) (expand-file-name default-directory)))) :help "Open Dired for subdir at or above point, tearing it off if inserted") (dired-kill-subdir menu-item "Remove This Inserted Subdir" dired-kill-subdir :visible (not (equal (expand-file-name (dired-current-directory)) (expand-file-name default-directory)))) (diredp-kill-this-tree menu-item "Remove This Inserted Subdir and Lower" diredp-kill-this-tree :visible (and (fboundp (quote diredp-kill-this-tree)) (not (equal (expand-file-name ...) (expand-file-name default-directory))))) (separator-diff "--") (ediff menu-item "Compare..." diredp-ediff :help "Compare file at cursor with another file") (diff menu-item "Diff..." dired-diff :help "Compare file at cursor with another file using `diff'") (backup-diff menu-item "Diff with Backup" dired-backup-diff :help "Diff file at cursor with its latest backup") (separator-rename "--") (capitalize menu-item "Capitalize" diredp-capitalize-this-file :help "Capitalize (initial caps) name of file at cursor") (upcase menu-item "Upcase" diredp-upcase-this-file :enable (or (not (fboundp (quote msdos-long-file-names))) (msdos-long-file-names)) :help "Rename file at cursor to an upper-case name") (downcase menu-item "Downcase" diredp-downcase-this-file :enable (or (not (fboundp (quote msdos-long-file-names))) (msdos-long-file-names)) :help "Rename file at cursor to a lower-case name") (separator-link "--") (rename menu-item "Move to..." diredp-rename-this-file :help "Rename file at cursor, or move it to a different directory") (copy menu-item "Copy to..." diredp-copy-this-file :help "Copy file at cursor") (relsymlink menu-item "Symlink to (Relative)..." diredp-relsymlink-this-file :help "Make relative symbolic link for file at cursor") (symlink menu-item "Symlink to (Absolute)..." diredp-symlink-this-file :help "Make absolute symbolic link for file at cursor") (hardlink menu-item "Hardlink to..." diredp-hardlink-this-file :help "Make hard links for current or marked files") (separator-delete "--") (delete menu-item "Delete" diredp-delete-this-file :help "Delete file at cursor") (separator-misc "--") (print menu-item "Print..." diredp-print-this-file :help "Print file at cursor, supplying print command") (grep menu-item "Grep..." diredp-grep-this-file :help "Grep file at cursor") (compress menu-item "Compress/Uncompress" diredp-compress-this-file :help "Compress/uncompress file at cursor") (command menu-item "Shell Command..." diredp-shell-command-this-file :help "Run a shell command on file at cursor") (diredp-async-shell-command-this-file menu-item "Asynchronous Shell Command..." diredp-async-shell-command-this-file :help "Run a shell command asynchronously on file at cursor") (compile menu-item "Byte Compile" diredp-byte-compile-this-file :help "Byte-compile this Emacs Lisp file") (load menu-item "Load" diredp-load-this-file :help "Load this Emacs Lisp file") (separator-change "--") (touch menu-item "Change Timestamp (`touch')..." diredp-touch-this-file :help "Change the timestamp of file at cursor, using `touch'") (chmod menu-item "Change Mode..." diredp-chmod-this-file :help "Change mode (attributes) of file at cursor") (separator-describe "--") (diredp-describe-file menu-item "Describe" diredp-describe-file :help "Describe the file or directory at cursor") "Single") (edit . undefined)) (remap keymap (advertised-undo . dired-undo) (undo . dired-undo) (toggle-read-only . dired-toggle-read-only) (read-only-mode . dired-toggle-read-only) (previous-line . diredp-previous-line) (next-line . diredp-next-line)) (follow-link . mouse-face) (mouse-2 . dired-mouse-find-file-other-window) keymap (103 . revert-buffer) (60 . beginning-of-buffer) (62 . end-of-buffer) (104 . describe-mode) (63 . describe-mode) (127 . scroll-down-command) (33554464 . scroll-down-command) (32 . scroll-up-command) (113 . quit-window) (57 . digit-argument) (56 . digit-argument) (55 . digit-argument) (54 . digit-argument) (53 . digit-argument) (52 . digit-argument) (51 . digit-argument) (50 . digit-argument) (49 . digit-argument) (48 . digit-argument) (45 . negative-argument) (remap keymap (self-insert-command . undefined))) "" ranger-mode)

[nil "\302\303\304 !\305$\207" [dired-mode-map ranger-key evil-define-key normal kbd ranger-mode] 5]()

eval-after-load("evil" #[nil "\302\303\304 !\305$\207" [dired-mode-map ranger-key evil-define-key normal kbd ranger-mode] 5]) byte-code("\203

It's such a big backtrace. Is this any useful for you?

punassuming commented 8 years ago

@renefroger, Can you defcustom ranger-key to nil? I am thinking you have set this binding already in your custom configuration. If this fixes it, I will need to check dired bindings before mapping over existing.

ReneFroger commented 8 years ago

As in

(setq ranger-key 'nil) 

? Because defcustom is more for packages than for configurations.

vyp commented 8 years ago

@ReneFroger (setq ranger-key nil)

ReneFroger commented 8 years ago

@vyp thanks for the suggestion.

After restarting Emacs with the setting, I got the error:

Wrong type argument: integer-or-marker-p, nil

vyp commented 8 years ago

That's strange, that shouldn't be because of (setq ranger-key nil)... as far as I can tell, the only code referencing ranger-key is https://github.com/ralesi/ranger.el/blob/4006b31a0cf7d48cc43bc73cc6940e42eb21e6a0/ranger.el#L436-L439. Are you sure that error is due to (setq ranger-key nil)...?

punassuming commented 8 years ago

I think we need to remove the :type from the ranger-key defcustom. Does sexp restrict using nil?

vyp commented 8 years ago

isn't nil in elisp the same as '() (an empty list)?

vyp commented 8 years ago
(let (option)
  (when option t)) ;; => nil

edit: sorry i meant:

(let ((option '()))
  (when option t)) ;; => nil
punassuming commented 8 years ago

I thought so too. @renefroger, What happens when you put the cursor right after the ending paren and run eval-last-sexp on just the setq command.

vyp commented 8 years ago

@ReneFroger alternatively i guess you could also try (setq ranger-key '()) in case I'm wrong. Also, I think you should be setting this before loading ranger, if you aren't already.

punassuming commented 8 years ago

@renefroger, let me know if any of these addressed the issue and I can update the code to prevent this issue, either by adjusting the type of ranger-key, or changing the conditional check.

ReneFroger commented 8 years ago

I still have the same issue, unfortunately. How can I help you?

punassuming commented 8 years ago

@ReneFroger, I completely changed the way ranger was dealing with mappings. So let me know if you ever get an issue again.