aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2002-01-17 01:43:18 +0000
committerRichard M. Stallman2002-01-17 01:43:18 +0000
commit3c53a3cf83c218772d9bcfde4cd60c1face33e93 (patch)
tree2dfc5646877e3f6264bfb77268901191fc3072a1
parent18e84493fa80f70db8455724d1ce9dbcb93d1b21 (diff)
downloademacs-3c53a3cf83c218772d9bcfde4cd60c1face33e93.tar.gz
emacs-3c53a3cf83c218772d9bcfde4cd60c1face33e93.zip
Delete the autoloads for functions defined with ibuffer-specific commands.
-rw-r--r--lisp/ibuf-ext.el21
1 files changed, 0 insertions, 21 deletions
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index f1e02dc6803..bd5e6d9528e 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -212,7 +212,6 @@ With numeric ARG, enable auto-update if and only if ARG is positive."
212 major-mode))))) 212 major-mode)))))
213 (ibuffer-update nil t)) 213 (ibuffer-update nil t))
214 214
215;;;###autoload
216(define-ibuffer-op shell-command-pipe (command) 215(define-ibuffer-op shell-command-pipe (command)
217 "Pipe the contents of each marked buffer to shell command COMMAND." 216 "Pipe the contents of each marked buffer to shell command COMMAND."
218 (:interactive "sPipe to shell command: " 217 (:interactive "sPipe to shell command: "
@@ -222,7 +221,6 @@ With numeric ARG, enable auto-update if and only if ARG is positive."
222 (point-min) (point-max) command 221 (point-min) (point-max) command
223 (get-buffer-create "* ibuffer-shell-output*"))) 222 (get-buffer-create "* ibuffer-shell-output*")))
224 223
225;;;###autoload
226(define-ibuffer-op shell-command-pipe-replace (command) 224(define-ibuffer-op shell-command-pipe-replace (command)
227 "Replace the contents of marked buffers with output of pipe to COMMAND." 225 "Replace the contents of marked buffers with output of pipe to COMMAND."
228 (:interactive "sPipe to shell command (replace): " 226 (:interactive "sPipe to shell command (replace): "
@@ -234,7 +232,6 @@ With numeric ARG, enable auto-update if and only if ARG is positive."
234 (shell-command-on-region (point-min) (point-max) 232 (shell-command-on-region (point-min) (point-max)
235 command nil t))) 233 command nil t)))
236 234
237;;;###autoload
238(define-ibuffer-op shell-command-file (command) 235(define-ibuffer-op shell-command-file (command)
239 "Run shell command COMMAND separately on files of marked buffers." 236 "Run shell command COMMAND separately on files of marked buffers."
240 (:interactive "sShell command on buffer's file: " 237 (:interactive "sShell command on buffer's file: "
@@ -247,7 +244,6 @@ With numeric ARG, enable auto-update if and only if ARG is positive."
247 (make-temp-file 244 (make-temp-file
248 (substring (buffer-name) 0 (min 10 (length (buffer-name)))))))))) 245 (substring (buffer-name) 0 (min 10 (length (buffer-name))))))))))
249 246
250;;;###autoload
251(define-ibuffer-op eval (form) 247(define-ibuffer-op eval (form)
252 "Evaluate FORM in each of the buffers. 248 "Evaluate FORM in each of the buffers.
253Does not display the buffer during evaluation. See 249Does not display the buffer during evaluation. See
@@ -257,7 +253,6 @@ Does not display the buffer during evaluation. See
257 :modifier-p :maybe) 253 :modifier-p :maybe)
258 (eval form)) 254 (eval form))
259 255
260;;;###autoload
261(define-ibuffer-op view-and-eval (form) 256(define-ibuffer-op view-and-eval (form)
262 "Evaluate FORM while displaying each of the marked buffers. 257 "Evaluate FORM while displaying each of the marked buffers.
263To evaluate a form without viewing the buffer, see `ibuffer-do-eval'." 258To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
@@ -272,14 +267,12 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
272 (eval form)) 267 (eval form))
273 (switch-to-buffer ibuffer-buf)))) 268 (switch-to-buffer ibuffer-buf))))
274 269
275;;;###autoload
276(define-ibuffer-op rename-uniquely () 270(define-ibuffer-op rename-uniquely ()
277 "Rename marked buffers as with `rename-uniquely'." 271 "Rename marked buffers as with `rename-uniquely'."
278 (:opstring "renamed" 272 (:opstring "renamed"
279 :modifier-p t) 273 :modifier-p t)
280 (rename-uniquely)) 274 (rename-uniquely))
281 275
282;;;###autoload
283(define-ibuffer-op revert () 276(define-ibuffer-op revert ()
284 "Revert marked buffers as with `revert-buffer'." 277 "Revert marked buffers as with `revert-buffer'."
285 (:dangerous t 278 (:dangerous t
@@ -288,7 +281,6 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
288 :modifier-p :maybe) 281 :modifier-p :maybe)
289 (revert-buffer t t)) 282 (revert-buffer t t))
290 283
291;;;###autoload
292(define-ibuffer-op replace-regexp (from-str to-str) 284(define-ibuffer-op replace-regexp (from-str to-str)
293 "Perform a `replace-regexp' in marked buffers." 285 "Perform a `replace-regexp' in marked buffers."
294 (:interactive 286 (:interactive
@@ -308,7 +300,6 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
308 (replace-match to-str)))) 300 (replace-match to-str))))
309 t)) 301 t))
310 302
311;;;###autoload
312(define-ibuffer-op query-replace (&rest args) 303(define-ibuffer-op query-replace (&rest args)
313 "Perform a `query-replace' in marked buffers." 304 "Perform a `query-replace' in marked buffers."
314 (:interactive 305 (:interactive
@@ -324,7 +315,6 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
324 (apply #'query-replace args))) 315 (apply #'query-replace args)))
325 t)) 316 t))
326 317
327;;;###autoload
328(define-ibuffer-op query-replace-regexp (&rest args) 318(define-ibuffer-op query-replace-regexp (&rest args)
329 "Perform a `query-replace-regexp' in marked buffers." 319 "Perform a `query-replace-regexp' in marked buffers."
330 (:interactive 320 (:interactive
@@ -340,7 +330,6 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
340 (apply #'query-replace-regexp args))) 330 (apply #'query-replace-regexp args)))
341 t)) 331 t))
342 332
343;;;###autoload
344(define-ibuffer-op print () 333(define-ibuffer-op print ()
345 "Print marked buffers as with `print-buffer'." 334 "Print marked buffers as with `print-buffer'."
346 (:opstring "printed" 335 (:opstring "printed"
@@ -580,7 +569,6 @@ of replacing the current filters."
580 569
581;;; Extra operation definitions 570;;; Extra operation definitions
582 571
583;;;###autoload
584(define-ibuffer-filter mode 572(define-ibuffer-filter mode
585 "Toggle current view to buffers with major mode QUALIFIER." 573 "Toggle current view to buffers with major mode QUALIFIER."
586 (:description "major mode" 574 (:description "major mode"
@@ -598,7 +586,6 @@ of replacing the current filters."
598 ""))))) 586 "")))))
599 (eq qualifier (with-current-buffer buf major-mode))) 587 (eq qualifier (with-current-buffer buf major-mode)))
600 588
601;;;###autoload
602(define-ibuffer-filter name 589(define-ibuffer-filter name
603 "Toggle current view to buffers with name matching QUALIFIER." 590 "Toggle current view to buffers with name matching QUALIFIER."
604 (:description "buffer name" 591 (:description "buffer name"
@@ -606,7 +593,6 @@ of replacing the current filters."
606 (read-from-minibuffer "Filter by name (regexp): ")) 593 (read-from-minibuffer "Filter by name (regexp): "))
607 (string-match qualifier (buffer-name buf))) 594 (string-match qualifier (buffer-name buf)))
608 595
609;;;###autoload
610(define-ibuffer-filter filename 596(define-ibuffer-filter filename
611 "Toggle current view to buffers with filename matching QUALIFIER." 597 "Toggle current view to buffers with filename matching QUALIFIER."
612 (:description "filename" 598 (:description "filename"
@@ -615,7 +601,6 @@ of replacing the current filters."
615 (ibuffer-awhen (buffer-file-name buf) 601 (ibuffer-awhen (buffer-file-name buf)
616 (string-match qualifier it))) 602 (string-match qualifier it)))
617 603
618;;;###autoload
619(define-ibuffer-filter size-gt 604(define-ibuffer-filter size-gt
620 "Toggle current view to buffers with size greater than QUALIFIER." 605 "Toggle current view to buffers with size greater than QUALIFIER."
621 (:description "size greater than" 606 (:description "size greater than"
@@ -624,7 +609,6 @@ of replacing the current filters."
624 (> (with-current-buffer buf (buffer-size)) 609 (> (with-current-buffer buf (buffer-size))
625 qualifier)) 610 qualifier))
626 611
627;;;###autoload
628(define-ibuffer-filter size-lt 612(define-ibuffer-filter size-lt
629 "Toggle current view to buffers with size less than QUALIFIER." 613 "Toggle current view to buffers with size less than QUALIFIER."
630 (:description "size less than" 614 (:description "size less than"
@@ -633,7 +617,6 @@ of replacing the current filters."
633 (< (with-current-buffer buf (buffer-size)) 617 (< (with-current-buffer buf (buffer-size))
634 qualifier)) 618 qualifier))
635 619
636;;;###autoload
637(define-ibuffer-filter content 620(define-ibuffer-filter content
638 "Toggle current view to buffers whose contents match QUALIFIER." 621 "Toggle current view to buffers whose contents match QUALIFIER."
639 (:description "content" 622 (:description "content"
@@ -644,7 +627,6 @@ of replacing the current filters."
644 (goto-char (point-min)) 627 (goto-char (point-min))
645 (re-search-forward qualifier nil t)))) 628 (re-search-forward qualifier nil t))))
646 629
647;;;###autoload
648(define-ibuffer-filter predicate 630(define-ibuffer-filter predicate
649 "Toggle current view to buffers for which QUALIFIER returns non-nil." 631 "Toggle current view to buffers for which QUALIFIER returns non-nil."
650 (:description "predicate" 632 (:description "predicate"
@@ -688,7 +670,6 @@ Possible sorting modes are:
688 "normal")) 670 "normal"))
689 (ibuffer-redisplay t)) 671 (ibuffer-redisplay t))
690 672
691;;;###autoload
692(define-ibuffer-sorter major-mode 673(define-ibuffer-sorter major-mode
693 "Sort the buffers by major modes. 674 "Sort the buffers by major modes.
694Ordering is lexicographic." 675Ordering is lexicographic."
@@ -702,7 +683,6 @@ Ordering is lexicographic."
702 (car b) 683 (car b)
703 major-mode))))) 684 major-mode)))))
704 685
705;;;###autoload
706(define-ibuffer-sorter alphabetic 686(define-ibuffer-sorter alphabetic
707 "Sort the buffers by their names. 687 "Sort the buffers by their names.
708Ordering is lexicographic." 688Ordering is lexicographic."
@@ -711,7 +691,6 @@ Ordering is lexicographic."
711 (buffer-name (car a)) 691 (buffer-name (car a))
712 (buffer-name (car b)))) 692 (buffer-name (car b))))
713 693
714;;;###autoload
715(define-ibuffer-sorter size 694(define-ibuffer-sorter size
716 "Sort the buffers by their size." 695 "Sort the buffers by their size."
717 (:description "size") 696 (:description "size")