MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.119.120.229
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/cedet/ede/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/cedet/ede/dired.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:03 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/ede/dired.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require easymenu dired ede] 2)
#@39 Keymap used for ede dired minor mode.
(defvar ede-dired-keymap (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210\302\311\312#\210\302\313\314#\210\315\316!\210\317\320\321\322$\210)\207" [map make-sparse-keymap define-key ".a" ede-dired-add-to-target ".t" ede-new-target ".s" ede-speedbar ".C" ede-compile-project ".d" ede-make-dist (lambda (#1=#:def-tmp-var) (defvar ede-dired-menu #1# #2="EDE Dired Minor Mode Menu")) nil easy-menu-do-define ede-dired-menu #2# ("Project" ["Add files to target" ede-dired-add-to-target (ede-current-project)] ("Build" :filter ede-build-forms-menu) "-" ["Create Project" ede-new (not (ede-current-project))] ["Create Target" ede-new-target (ede-current-project)] "-" ("Customize Project" :filter ede-customize-forms-menu) ["View Project Tree" ede-speedbar (ede-current-project)])] 5) (#$ . 643))
#@109 Non-nil if Ede-Dired minor mode is enabled.
Use the command `ede-dired-minor-mode' to change this variable.
(defvar ede-dired-minor-mode nil (#$ . 1507))
(make-variable-buffer-local 'ede-dired-minor-mode)
#@132 A minor mode that should only be activated in DIRED buffers.
If ARG is nil or a positive number, force on, if
negative, force off.
(defalias 'ede-dired-minor-mode #[(&optional arg) "\304 	\305=\203\n?\202\306	!\307V\310\311!\204 \312\313\314!\210\315!\204.\316\317!\204.\312\320\321\n\2038\322\2029\323\"\210\316\317!\203Z\304 \203M\304 \232\203Z\324\325\n\203W\326\202X\327\"\210)\330 \210\n\207" [#1=#:last-message arg ede-dired-minor-mode default-directory current-message toggle prefix-numeric-value 0 derived-mode-p dired-mode nil error "Not in DIRED mode" ede-directory-project-p called-interactively-p any run-hooks ede-dired-minor-mode-hook ede-dired-minor-mode-on-hook ede-dired-minor-mode-off-hook message "Ede-Dired minor mode %sabled" "en" "dis" force-mode-line-update] 3 (#$ . 1719) (list (or current-prefix-arg 'toggle))])
(byte-code "\301\302\303\304\211%\207" [ede-dired-keymap add-minor-mode ede-dired-minor-mode " EDE" nil] 6)
#@48 Add a file, or all marked files into a TARGET.
(defalias 'ede-dired-add-to-target #[(target) "\304\305!\306\211\205-	@\307\n\"\210\310!\203%r\310!q\210\306\311p!)	A\211\204\n\306*\207" [file --dolist-tail-- target ede-object dired-get-marked-files t nil project-add-file get-file-buffer ede-buffer-object] 4 (#$ . 2691) (list (let ((ede-object (ede-current-project))) (ede-invoke-method 'project-interactive-select-target "Add files to Target: ")))])
(provide 'ede/dired)

MMCT - 2023