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
bffd00b0
Commit
bffd00b0
authored
Jul 12, 1997
by
Richard M. Stallman
Browse files
(Fwrite_region): Fix call2 argument.
(Fread_file_name): Convert Fcons argument to Lisp_Integer.
parent
4dcb3ee3
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
3 deletions
+3
-3
src/fileio.c
src/fileio.c
+3
-3
No files found.
src/fileio.c
View file @
bffd00b0
/* File IO for GNU Emacs.
Copyright (C) 1985,86,87,88,93,94,95,96 Free Software Foundation, Inc.
Copyright (C) 1985,86,87,88,93,94,95,96
,1997
Free Software Foundation, Inc.
This file is part of GNU Emacs.
...
...
@@ -3909,7 +3909,7 @@ to the file, instead of any buffer contents, and END is ignored.")
/* If we've locked this file for some other buffer,
query before proceeding. */
if
(
!
visiting
&&
EQ
(
Ffile_locked_p
(
lockname
),
Qt
))
call2
(
intern
(
"ask-user-about-lock"
),
f
n
,
Vuser_login_name
);
call2
(
intern
(
"ask-user-about-lock"
),
f
ilename
,
Vuser_login_name
);
lock_file
(
lockname
);
}
...
...
@@ -4853,7 +4853,7 @@ DIR defaults to current buffer's directory default.")
else
if
(
STRINGP
(
initial
))
{
insdef
=
initial
;
insdef1
=
Fcons
(
double_dollars
(
insdef
),
0
);
insdef1
=
Fcons
(
double_dollars
(
insdef
),
make_number
(
0
)
);
}
else
insdef
=
Qnil
,
insdef1
=
Qnil
;
...
...
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