;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(autoload 'dired-get-filename "dired")
#@40 Keymap used when browsing directories.
(defvar url-dired-minor-mode-map (byte-code "\300 \301
\302\303#\210\301
\304\305#\210\207" [make-sparse-keymap define-key "
" url-dired-find-file [mouse-2] url-dired-find-file-mouse] 5) (#$ . 123))
#@59 In dired, visit the file or directory named on this line.
(defalias 'url-dired-find-file #[0 "\300 \301
!\207" [dired-get-filename find-file] 3 (#$ . 367) nil])
#@70 In dired, visit the file or directory name you click on.

(fn EVENT)
(defalias 'url-dired-find-file-mouse #[257 "\300
!\210\301 \207" [mouse-set-point url-dired-find-file] 3 (#$ . 534) "@e"])
#@109 Non-nil if URL-Dired minor mode is enabled.
Use the command `url-dired-minor-mode' to change this variable.
(defvar url-dired-minor-mode nil (#$ . 733))
(make-variable-buffer-local 'url-dired-minor-mode)
#@601 Minor mode for directory browsing.

This is a minor mode.  If called interactively, toggle the `URL-Dired
minor mode' mode.  If the prefix argument is positive, enable the
mode, and if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `url-dired-minor-mode'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

(fn &optional ARG)
(defalias 'url-dired-minor-mode #[256 "\302 
\303=\203
?\202
\247\203
\304W\203\305\202\306\307\301!\2031\310\300	\"\2031\300	B\311\312\203;\313\202<\314\"\210\315\316!\203^\302 \203P\211\302 \232\203^\317\320\203Z\321\202[\322\323#\210\210\324 \210\207" [url-dired-minor-mode local-minor-modes current-message toggle 1 nil t boundp delq run-hooks url-dired-minor-mode-hook url-dired-minor-mode-on-hook url-dired-minor-mode-off-hook called-interactively-p any message "URL-Dired minor mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 944) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar url-dired-minor-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\313\310\211%\207" [url-dired-minor-mode-map url-dired-minor-mode-hook variable-documentation put "Hook run after entering or leaving `url-dired-minor-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode url-dired-minor-mode " URL"] 6)
#@76 "Edit" directory DIR, but with additional URL-friendly bindings.

(fn DIR)
(defalias 'url-find-file-dired #[257 "\300
!\210\301\302!\207" [find-file url-dired-minor-mode t] 3 (#$ . 2752) "DURL Dired (directory): "])
(provide 'url-dired)