[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: diff-autosaved
From: |
Andrea Crotti |
Subject: |
Re: diff-autosaved |
Date: |
Sat, 30 Apr 2011 11:48:37 +0200 |
User-agent: |
Gnus/5.110016 (No Gnus v0.16) Emacs/24.0.50 (gnu/linux) |
Andreas Röhler <andreas.roehler@easy-emacs.de> writes:
> Hi,
>
> occassionally want to compare a file with its auto-saved version.
>
> Couldn't find a function doing this.
> Tweaked diff-backup for the purpose.
>
> The result:
>
>
> (defun diff-autosaved (&optional switches)
> "Diff this file with its auto-saved version or vice versa.
> With prefix arg, prompt for diff switches."
> (interactive (list (diff-switches)))
> (let ((dir default-directory)
> (file (file-name-nondirectory (replace-regexp-in-string "#" ""
> (buffer-file-name))))
> bak ori)
> (if (string-match "^#" file)
> (setq bak file
> ori (replace-regexp-in-string "#" "" file))
> (setq bak (concat "#" file "#")
> ori file))
> (setq bak (concat dir bak))
> (setq ori (concat dir ori))
> (diff bak ori switches)))
>
>
> Comments welcome.
>
> Andreas
Nice I'll try it out...
But why do you want to compare with the auto-saved, and not for example
do diff-buffer-with-file?
And also using revision control I just see the git/bzr/whatever diff
with the last committed version..
--
GNU Emacs 24.0.50.2 (x86_64-unknown-linux-gnu, GTK+ Version 2.22.0)
of 2011-04-22 on plaetekopp