diff options
| author | Richard M. Stallman | 1992-06-04 23:02:37 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-06-04 23:02:37 +0000 |
| commit | 4176aa4a4ef22197280ead0954f1987f21a452aa (patch) | |
| tree | 87400f9f941e6f33a38fba44280b1f8790e45ef6 /src | |
| parent | 85ffea93957d4103dcb5143b1391ee8c6051e10c (diff) | |
| download | emacs-4176aa4a4ef22197280ead0954f1987f21a452aa.tar.gz emacs-4176aa4a4ef22197280ead0954f1987f21a452aa.zip | |
entered into RCS
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/src/editfns.c b/src/editfns.c index 6164ef32799..04772cb945b 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -542,28 +542,6 @@ if we can figure out a reasonably easy way to get that information.") | |||
| 542 | 542 | ||
| 543 | return build_string (buf); | 543 | return build_string (buf); |
| 544 | } | 544 | } |
| 545 | |||
| 546 | #ifdef unix | ||
| 547 | |||
| 548 | DEFUN ("set-default-file-mode", Fset_default_file_mode, Sset_default_file_mode, 1, 1, "p", | ||
| 549 | "Set Unix `umask' value to ARGUMENT, and return old value.\n\ | ||
| 550 | The `umask' value is the default protection mode for new files.") | ||
| 551 | (nmask) | ||
| 552 | Lisp_Object nmask; | ||
| 553 | { | ||
| 554 | CHECK_NUMBER (nmask, 0); | ||
| 555 | return make_number (umask (XINT (nmask))); | ||
| 556 | } | ||
| 557 | |||
| 558 | DEFUN ("unix-sync", Funix_sync, Sunix_sync, 0, 0, "", | ||
| 559 | "Tell Unix to finish all pending disk updates.") | ||
| 560 | () | ||
| 561 | { | ||
| 562 | sync (); | ||
| 563 | return Qnil; | ||
| 564 | } | ||
| 565 | |||
| 566 | #endif /* unix */ | ||
| 567 | 545 | ||
| 568 | void | 546 | void |
| 569 | insert1 (arg) | 547 | insert1 (arg) |
| @@ -1278,8 +1256,6 @@ syms_of_editfns () | |||
| 1278 | defsubr (&Scurrent_time); | 1256 | defsubr (&Scurrent_time); |
| 1279 | defsubr (&Scurrent_time_string); | 1257 | defsubr (&Scurrent_time_string); |
| 1280 | defsubr (&Ssystem_name); | 1258 | defsubr (&Ssystem_name); |
| 1281 | defsubr (&Sset_default_file_mode); | ||
| 1282 | defsubr (&Sunix_sync); | ||
| 1283 | defsubr (&Smessage); | 1259 | defsubr (&Smessage); |
| 1284 | defsubr (&Sformat); | 1260 | defsubr (&Sformat); |
| 1285 | 1261 | ||