comparison lisp/progmodes/ebrowse.el @ 52529:c4c3b1b0d5c0

Fix broken magic autoload comments.
author Masatake YAMATO <jet@gyve.org>
date Thu, 18 Sep 2003 17:08:22 +0000
parents 695cf19ef79e
children ab8776511cbc
comparison
equal deleted inserted replaced
52528:31ec35eae895 52529:c4c3b1b0d5c0
2225 2225
2226 2226
2227 2227
2228 ;;; Member mode 2228 ;;; Member mode
2229 2229
2230 ;;###autoload 2230 ;;;###autoload
2231 (defun ebrowse-member-mode () 2231 (defun ebrowse-member-mode ()
2232 "Major mode for Ebrowse member buffers. 2232 "Major mode for Ebrowse member buffers.
2233 2233
2234 \\{ebrowse-member-mode-map}" 2234 \\{ebrowse-member-mode-map}"
2235 (kill-all-local-variables) 2235 (kill-all-local-variables)
3395 (ebrowse-value-in-buffer 'ebrowse--tags-file-name tree-buffer)) 3395 (ebrowse-value-in-buffer 'ebrowse--tags-file-name tree-buffer))
3396 ;; Record position jumped to 3396 ;; Record position jumped to
3397 (ebrowse-push-position (point-marker) info t)))) 3397 (ebrowse-push-position (point-marker) info t))))
3398 3398
3399 3399
3400 ;;###autoload 3400 ;;;###autoload
3401 (defun ebrowse-tags-view-declaration () 3401 (defun ebrowse-tags-view-declaration ()
3402 "View declaration of member at point." 3402 "View declaration of member at point."
3403 (interactive) 3403 (interactive)
3404 (ebrowse-tags-view/find-member-decl/defn 0 :view t :definition nil)) 3404 (ebrowse-tags-view/find-member-decl/defn 0 :view t :definition nil))
3405 3405
3406 3406
3407 ;;###autoload 3407 ;;;###autoload
3408 (defun ebrowse-tags-find-declaration () 3408 (defun ebrowse-tags-find-declaration ()
3409 "Find declaration of member at point." 3409 "Find declaration of member at point."
3410 (interactive) 3410 (interactive)
3411 (ebrowse-tags-view/find-member-decl/defn 0 :view nil :definition nil)) 3411 (ebrowse-tags-view/find-member-decl/defn 0 :view nil :definition nil))
3412 3412
3413 3413
3414 ;;###autoload 3414 ;;;###autoload
3415 (defun ebrowse-tags-view-definition () 3415 (defun ebrowse-tags-view-definition ()
3416 "View definition of member at point." 3416 "View definition of member at point."
3417 (interactive) 3417 (interactive)
3418 (ebrowse-tags-view/find-member-decl/defn 0 :view t :definition t)) 3418 (ebrowse-tags-view/find-member-decl/defn 0 :view t :definition t))
3419 3419
3420 3420
3421 ;;###autoload 3421 ;;;###autoload
3422 (defun ebrowse-tags-find-definition () 3422 (defun ebrowse-tags-find-definition ()
3423 "Find definition of member at point." 3423 "Find definition of member at point."
3424 (interactive) 3424 (interactive)
3425 (ebrowse-tags-view/find-member-decl/defn 0 :view nil :definition t)) 3425 (ebrowse-tags-view/find-member-decl/defn 0 :view nil :definition t))
3426 3426
3429 "View declaration of member at point in other window." 3429 "View declaration of member at point in other window."
3430 (interactive) 3430 (interactive)
3431 (ebrowse-tags-view/find-member-decl/defn 4 :view t :definition nil)) 3431 (ebrowse-tags-view/find-member-decl/defn 4 :view t :definition nil))
3432 3432
3433 3433
3434 ;;###autoload 3434 ;;;###autoload
3435 (defun ebrowse-tags-find-declaration-other-window () 3435 (defun ebrowse-tags-find-declaration-other-window ()
3436 "Find declaration of member at point in other window." 3436 "Find declaration of member at point in other window."
3437 (interactive) 3437 (interactive)
3438 (ebrowse-tags-view/find-member-decl/defn 4 :view nil :definition nil)) 3438 (ebrowse-tags-view/find-member-decl/defn 4 :view nil :definition nil))
3439 3439
3440 3440
3441 ;;###autoload 3441 ;;;###autoload
3442 (defun ebrowse-tags-view-definition-other-window () 3442 (defun ebrowse-tags-view-definition-other-window ()
3443 "View definition of member at point in other window." 3443 "View definition of member at point in other window."
3444 (interactive) 3444 (interactive)
3445 (ebrowse-tags-view/find-member-decl/defn 4 :view t :definition t)) 3445 (ebrowse-tags-view/find-member-decl/defn 4 :view t :definition t))
3446 3446
3447 3447
3448 ;;###autoload 3448 ;;;###autoload
3449 (defun ebrowse-tags-find-definition-other-window () 3449 (defun ebrowse-tags-find-definition-other-window ()
3450 "Find definition of member at point in other window." 3450 "Find definition of member at point in other window."
3451 (interactive) 3451 (interactive)
3452 (ebrowse-tags-view/find-member-decl/defn 4 :view nil :definition t)) 3452 (ebrowse-tags-view/find-member-decl/defn 4 :view nil :definition t))
3453 3453
3456 "View definition of member at point in other frame." 3456 "View definition of member at point in other frame."
3457 (interactive) 3457 (interactive)
3458 (ebrowse-tags-view/find-member-decl/defn 5 :view t :definition nil)) 3458 (ebrowse-tags-view/find-member-decl/defn 5 :view t :definition nil))
3459 3459
3460 3460
3461 ;;###autoload 3461 ;;;###autoload
3462 (defun ebrowse-tags-find-declaration-other-frame () 3462 (defun ebrowse-tags-find-declaration-other-frame ()
3463 "Find definition of member at point in other frame." 3463 "Find definition of member at point in other frame."
3464 (interactive) 3464 (interactive)
3465 (ebrowse-tags-view/find-member-decl/defn 5 :view nil :definition nil)) 3465 (ebrowse-tags-view/find-member-decl/defn 5 :view nil :definition nil))
3466 3466
3467 3467
3468 ;;###autoload 3468 ;;;###autoload
3469 (defun ebrowse-tags-view-definition-other-frame () 3469 (defun ebrowse-tags-view-definition-other-frame ()
3470 "View definition of member at point in other frame." 3470 "View definition of member at point in other frame."
3471 (interactive) 3471 (interactive)
3472 (ebrowse-tags-view/find-member-decl/defn 5 :view t :definition t)) 3472 (ebrowse-tags-view/find-member-decl/defn 5 :view t :definition t))
3473 3473
3474 3474
3475 ;;###autoload 3475 ;;;###autoload
3476 (defun ebrowse-tags-find-definition-other-frame () 3476 (defun ebrowse-tags-find-definition-other-frame ()
3477 "Find definition of member at point in other frame." 3477 "Find definition of member at point in other frame."
3478 (interactive) 3478 (interactive)
3479 (ebrowse-tags-view/find-member-decl/defn 5 :view nil :definition t)) 3479 (ebrowse-tags-view/find-member-decl/defn 5 :view nil :definition t))
3480 3480
3777 (ebrowse-tags-next-file) 3777 (ebrowse-tags-next-file)
3778 (message "Scanning file `%s'..." buffer-file-name) 3778 (message "Scanning file `%s'..." buffer-file-name)
3779 (goto-char (point-min)))) 3779 (goto-char (point-min))))
3780 3780
3781 3781
3782 ;;###autoload 3782 ;;;###autoload
3783 (defun ebrowse-tags-search (regexp) 3783 (defun ebrowse-tags-search (regexp)
3784 "Search for REGEXP in all files in a tree. 3784 "Search for REGEXP in all files in a tree.
3785 If marked classes exist, process marked classes, only. 3785 If marked classes exist, process marked classes, only.
3786 If regular expression is nil, repeat last search." 3786 If regular expression is nil, repeat last search."
3787 (interactive "sTree search (regexp): ") 3787 (interactive "sTree search (regexp): ")