app-emacs/mldonkey/files/51mldonkey-gentoo.el


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

;;; mldonkey site-lisp configuration

(add-to-list 'load-path "@SITELISP@")
(autoload 'mldonkey "mldonkey" "Run the MlDonkey interface." t)

(setq mldonkey-vd-filename-filters
      '(mldonkey-vd-filename-remove-p20
	mldonkey-vd-filename-remove-trailing-ws))

(setq mldonkey-vd-sort-functions
      '((not mldonkey-vd-sort-dl-state)
        (not mldonkey-vd-sort-dl-percent)))

(setq mldonkey-vd-sort-fin-functions
      '(mldonkey-vd-sort-dl-number))

(add-hook 'mldonkey-pause-hook 'mldonkey-vd)
(add-hook 'mldonkey-resume-hook 'mldonkey-vd)
(add-hook 'mldonkey-commit-hook 'mldonkey-vd)
(add-hook 'mldonkey-recover-temp-hook 'mldonkey-vd)