Mercurial > emacs
changeset 690:be66b03cbead
entered into RCS
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 04 Jun 1992 23:02:37 +0000 |
| parents | 45401d45581d |
| children | cae8c3ef1677 |
| files | src/editfns.c |
| diffstat | 1 files changed, 0 insertions(+), 24 deletions(-) [+] |
line wrap: on
line diff
--- a/src/editfns.c Thu Jun 04 23:02:33 1992 +0000 +++ b/src/editfns.c Thu Jun 04 23:02:37 1992 +0000 @@ -542,28 +542,6 @@ return build_string (buf); } - -#ifdef unix - -DEFUN ("set-default-file-mode", Fset_default_file_mode, Sset_default_file_mode, 1, 1, "p", - "Set Unix `umask' value to ARGUMENT, and return old value.\n\ -The `umask' value is the default protection mode for new files.") - (nmask) - Lisp_Object nmask; -{ - CHECK_NUMBER (nmask, 0); - return make_number (umask (XINT (nmask))); -} - -DEFUN ("unix-sync", Funix_sync, Sunix_sync, 0, 0, "", - "Tell Unix to finish all pending disk updates.") - () -{ - sync (); - return Qnil; -} - -#endif /* unix */ void insert1 (arg) @@ -1278,8 +1256,6 @@ defsubr (&Scurrent_time); defsubr (&Scurrent_time_string); defsubr (&Ssystem_name); - defsubr (&Sset_default_file_mode); - defsubr (&Sunix_sync); defsubr (&Smessage); defsubr (&Sformat);