]> git.eshelyaron.com Git - emacs.git/commitdiff
(tar-mode-write-file): Don't signal an error by
authorGerd Moellmann <gerd@gnu.org>
Thu, 27 Sep 2001 08:11:36 +0000 (08:11 +0000)
committerGerd Moellmann <gerd@gnu.org>
Thu, 27 Sep 2001 08:11:36 +0000 (08:11 +0000)
calling byte-to-position with a nil tar-header-offset.

lisp/tar-mode.el

index 2e1b8c5d5deb8fbdcf3540baaa835911ea95f81e..4c89f9b4cafe02f4101a5ab0f4af7f1a6e62eca0 100644 (file)
@@ -1245,8 +1245,9 @@ Leaves the region wide."
        ;; tar-header-offset turns out to be null for files fetched with W3,
        ;; at least.
        (let ((coding-system-for-write 'no-conversion))
-         (write-region (or (byte-to-position tar-header-offset)
-                           (point-min))
+         (write-region (if tar-header-offset
+                           (byte-to-position tar-header-offset)
+                         (point-min))
                        (point-max)
                        buffer-file-name nil t))
        (tar-clear-modification-flags)