--- a/.emacs-my	Fri Oct 01 14:30:27 2010 +0300
+++ b/.emacs-my	Sun Oct 03 18:39:42 2010 +0300
@@ -516,8 +516,6 @@
   "Flag all temporary files for deletion."
   (interactive)
   (dired-mark-if
-   ;; (let ( (fn (dired-get-filename)) )
-   ;;   (if fn (backup-file-name-p fn)))
    (let ( (fn (dired-get-filename 'verbatim t)) )
      (and fn (my-file-name-tmp-p fn)) )
    "backup file"