unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
From: jpw@pobox.com (John Paul Wallington)
Subject: Re: diffs between a buffer and the underlying file
Date: Wed, 06 Sep 2006 01:18:10 +0100	[thread overview]
Message-ID: <uk64hluf1.fsf@pobox.com> (raw)
In-Reply-To: m2odtujmix.fsf@janus.isnogud.escape.de

Urs Thuermann <urs@isnogud.escape.de> writes:

> I sometimes get into the following situation:  I open a file, make
> some changes, then I want to see the changes before saving the file.

The development version of Emacs has M-x diff-buffer-with-file that
does what you want.  If you are using a release version of Emacs then
you could try putting this in your .emacs file (untested):

(defun diff-buffer-with-file (&optional buffer)
  "View the differences between BUFFER and its associated file.
This requires the external program `diff' to be in your `exec-path'."
  (interactive "bBuffer: ")
  (with-current-buffer (get-buffer (or buffer (current-buffer)))
    (if (and buffer-file-name
	     (file-exists-p buffer-file-name))
	(let ((tempfile (make-temp-file "buffer-content-")))
	  (unwind-protect
	      (save-restriction
		(widen)
		(write-region (point-min) (point-max) tempfile nil 'nomessage)
		(diff buffer-file-name tempfile nil t)
		(sit-for 0))
	    (when (file-exists-p tempfile)
	      (delete-file tempfile))))
      (message "Buffer %s has no associated file on disc" (buffer-name))
      ;; Display that message for 1 second so that user can read it
      ;; in the minibuffer.
      (sit-for 1)))
  ;; return always nil, so that save-buffers-kill-emacs will not move
  ;; over to the next unsaved buffer when calling `d'.
  nil)

Also, the Ibuffer library, an advanced replacement for the normal
buffer menu, has an `ibuffer-diff-with-file' command that you can get
by pressing =.  Ibuffer is included in the development version of
Emacs.  Alternatively, a stable version of Ibuffer is available from
http://www.shootybangbang.com/software/ibuffer.el

  parent reply	other threads:[~2006-09-06  0:18 UTC|newest]

Thread overview: 16+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2006-09-05 16:39 diffs between a buffer and the underlying file Urs Thuermann
2006-09-05 18:10 ` Eric Hanchrow
2006-09-06  0:18 ` John Paul Wallington [this message]
2006-09-06  9:18   ` Romain Francoise
2006-09-06  1:39 ` Drew Adams
  -- strict thread matches above, loose matches on Subject: below --
2006-09-14  6:19 Urs Thuermann
2006-09-14  6:55 ` Michaël Cadilhac
2006-09-17  8:07   ` Urs Thuermann
2006-09-17  8:20     ` Michaël Cadilhac
     [not found]     ` <mailman.7052.1158517019.9609.help-gnu-emacs@gnu.org>
2006-09-18 17:30       ` Urs Thuermann
2006-09-20 19:11         ` John Sullivan
     [not found]         ` <mailman.7207.1158782592.9609.help-gnu-emacs@gnu.org>
2006-09-21  4:14           ` Tim X
2006-10-14 19:56             ` David Combs
2006-09-21  7:43         ` Romain Francoise
2006-09-14  7:13 ` David Hansen
2006-09-14  8:57 ` Darren

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=uk64hluf1.fsf@pobox.com \
    --to=jpw@pobox.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).