[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Sat, 30 Apr 2011 11:48:37 +0200
Gnus/5.110016 (No Gnus v0.16) Emacs/24.0.50 (gnu/linux)
Andreas Röhler <address@hidden> writes:
> 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 "#" ""
> 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.
Nice I'll try it out...
But why do you want to compare with the auto-saved, and not for example
And also using revision control I just see the git/bzr/whatever diff
with the last committed version..
GNU Emacs 18.104.22.168 (x86_64-unknown-linux-gnu, GTK+ Version 2.22.0)
of 2011-04-22 on plaetekopp