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
bf3428a1
Commit
bf3428a1
authored
May 28, 2002
by
Richard M. Stallman
Browse files
(Fwrite_region): If START is a string, don't make any annotations.
parent
2520dc0c
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
17 additions
and
9 deletions
+17
-9
src/fileio.c
src/fileio.c
+17
-9
No files found.
src/fileio.c
View file @
bf3428a1
...
...
@@ -4827,11 +4827,16 @@ This does code conversion according to the value of
count1
=
specpdl_ptr
-
specpdl
;
given_buffer
=
current_buffer
;
annotations
=
build_annotations
(
start
,
end
);
if
(
current_buffer
!=
given_buffer
)
if
(
!
STRINGP
(
start
)
)
{
XSETFASTINT
(
start
,
BEGV
);
XSETFASTINT
(
end
,
ZV
);
annotations
=
build_annotations
(
start
,
end
);
if
(
current_buffer
!=
given_buffer
)
{
XSETFASTINT
(
start
,
BEGV
);
XSETFASTINT
(
end
,
ZV
);
}
}
UNGCPRO
;
...
...
@@ -4847,12 +4852,15 @@ This does code conversion according to the value of
Vlast_coding_system_used
=
coding
.
symbol
;
given_buffer
=
current_buffer
;
annotations
=
build_annotations_2
(
start
,
end
,
coding
.
pre_write_conversion
,
annotations
);
if
(
current_buffer
!=
given_buffer
)
if
(
!
STRINGP
(
start
))
{
XSETFASTINT
(
start
,
BEGV
);
XSETFASTINT
(
end
,
ZV
);
annotations
=
build_annotations_2
(
start
,
end
,
coding
.
pre_write_conversion
,
annotations
);
if
(
current_buffer
!=
given_buffer
)
{
XSETFASTINT
(
start
,
BEGV
);
XSETFASTINT
(
end
,
ZV
);
}
}
#ifdef CLASH_DETECTION
...
...
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