Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
4063eb1c
Commit
4063eb1c
authored
Apr 29, 1998
by
Dave Love
Browse files
(tar-mode-write-file): Protect from null tar-header-offset.
parent
95160594
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
1 deletion
+4
-1
lisp/tar-mode.el
lisp/tar-mode.el
+4
-1
No files found.
lisp/tar-mode.el
View file @
4063eb1c
...
...
@@ -1205,7 +1205,10 @@ Leaves the region wide."
;; Doing this here confuses things - the region gets left too wide!
;; I suppose this is run in a context where changing the buffer is bad.
;; (tar-pad-to-blocksize)
(
write-region
tar-header-offset
(
point-max
)
buffer-file-name
nil
t
)
;; tar-header-offset turns out to be null for files fetched with W3,
;; at least.
(
write-region
(
or
tar-header-offset
(
point-min
))
(
point-max
)
buffer-file-name
nil
t
)
(
tar-clear-modification-flags
)
(
set-buffer-modified-p
nil
))
(
narrow-to-region
1
tar-header-offset
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment