diff options
| author | Daniel Colascione | 2012-11-18 17:39:37 -0800 |
|---|---|---|
| committer | Daniel Colascione | 2012-11-18 17:39:37 -0800 |
| commit | 6e9f7997b36d21004794fa2b8a550729cbabd81a (patch) | |
| tree | 593f2e582974d5fd2157204f1fa6eeef425a2f55 | |
| parent | 031b541f1943a49ee06944cc5957dab3f7baedf9 (diff) | |
| download | emacs-6e9f7997b36d21004794fa2b8a550729cbabd81a.tar.gz emacs-6e9f7997b36d21004794fa2b8a550729cbabd81a.zip | |
Rename cygwin_convert_path* to cygwin_convert_file_name*
| -rw-r--r-- | etc/NEWS | 7 | ||||
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/term/w32-win.el | 4 | ||||
| -rw-r--r-- | src/ChangeLog | 9 | ||||
| -rw-r--r-- | src/cygw32.c | 20 | ||||
| -rw-r--r-- | src/w32fns.c | 6 |
6 files changed, 34 insertions, 17 deletions
| @@ -1034,9 +1034,10 @@ takes precedence over most other maps for a short while (normally one key). | |||
| 1034 | Pass --with-w32 to configure. The default remains the X11 interface. | 1034 | Pass --with-w32 to configure. The default remains the X11 interface. |
| 1035 | 1035 | ||
| 1036 | ** Two new functions are available in Cygwin builds: | 1036 | ** Two new functions are available in Cygwin builds: |
| 1037 | `cygwin-convert-path-from-windows' and `cygwin-convert-path-to-windows'. | 1037 | `cygwin-convert-file-name-from-windows' and |
| 1038 | These functions allow Lisp code to access the Cygwin file-name mapping | 1038 | `cygwin-convert-file-name-to-windows'. These functions allow Lisp |
| 1039 | machinery to convert between Cygwin and Windows-native file names. | 1039 | code to access the Cygwin file-name mapping machinery to convert |
| 1040 | between Cygwin and Windows-native file and directory names. | ||
| 1040 | 1041 | ||
| 1041 | ** When invoked with the -nw switch to run on the Windows text-mode terminal, | 1042 | ** When invoked with the -nw switch to run on the Windows text-mode terminal, |
| 1042 | Emacs now supports mouse highlight, help-echo (in the echo area), and | 1043 | Emacs now supports mouse highlight, help-echo (in the echo area), and |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ca65e431964..26b4e6bb8c7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-11-19 Daniel Colascione <dancol@dancol.org> | ||
| 2 | |||
| 3 | * term/w32-win.el (cygwin-convert-path-from-windows): Accomodate | ||
| 4 | rename of cygwin_convert_path* to cygwin_convert_file_name*. | ||
| 5 | |||
| 1 | 2012-11-18 Chong Yidong <cyd@gnu.org> | 6 | 2012-11-18 Chong Yidong <cyd@gnu.org> |
| 2 | 7 | ||
| 3 | * filecache.el (file-cache--read-list): New function. | 8 | * filecache.el (file-cache--read-list): New function. |
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 42e09b65750..95dab10101b 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el | |||
| @@ -91,7 +91,7 @@ | |||
| 91 | (declare-function w32-send-sys-command "w32fns.c") | 91 | (declare-function w32-send-sys-command "w32fns.c") |
| 92 | (declare-function set-message-beep "w32fns.c") | 92 | (declare-function set-message-beep "w32fns.c") |
| 93 | 93 | ||
| 94 | (declare-function cygwin-convert-path-from-windows "cygw32.c" | 94 | (declare-function cygwin-convert-file-name-from-windows "cygw32.c" |
| 95 | (path &optional absolute_p)) | 95 | (path &optional absolute_p)) |
| 96 | 96 | ||
| 97 | ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles | 97 | ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles |
| @@ -108,7 +108,7 @@ | |||
| 108 | 108 | ||
| 109 | (defun w32-handle-dropped-file (window file-name) | 109 | (defun w32-handle-dropped-file (window file-name) |
| 110 | (let ((f (if (eq system-type 'cygwin) | 110 | (let ((f (if (eq system-type 'cygwin) |
| 111 | (cygwin-convert-path-from-windows file-name t) | 111 | (cygwin-convert-file-name-from-windows file-name t) |
| 112 | (subst-char-in-string ?\\ ?/ file-name))) | 112 | (subst-char-in-string ?\\ ?/ file-name))) |
| 113 | (coding (or file-name-coding-system | 113 | (coding (or file-name-coding-system |
| 114 | default-file-name-coding-system))) | 114 | default-file-name-coding-system))) |
diff --git a/src/ChangeLog b/src/ChangeLog index 2a0c0e6822d..89c4e273715 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2012-11-19 Daniel Colascione <dancol@dancol.org> | ||
| 2 | |||
| 3 | * w32fns.c (Fx_file_dialog): | ||
| 4 | (Fx_file_dialog): Accomodate rename of cygwin_convert_path* to | ||
| 5 | cygwin_convert_file_name*. | ||
| 6 | |||
| 7 | * cygw32.c (Fcygwin_convert_path_to_windows, syms_of_cygw32): | ||
| 8 | Rename cygwin_convert_path* to cygwin_convert_file_name*. | ||
| 9 | |||
| 1 | 2012-11-18 Paul Eggert <eggert@cs.ucla.edu> | 10 | 2012-11-18 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 11 | ||
| 3 | * nsterm.m (ns_select): Send SIGIO only to self, not to process group. | 12 | * nsterm.m (ns_select): Send SIGIO only to self, not to process group. |
diff --git a/src/cygw32.c b/src/cygw32.c index 54f2076a891..d9777d5e22e 100644 --- a/src/cygw32.c +++ b/src/cygw32.c | |||
| @@ -106,22 +106,24 @@ conv_filename_from_w32_unicode (const wchar_t* in, int absolute_p) | |||
| 106 | return unbind_to (count, DECODE_FILE (converted)); | 106 | return unbind_to (count, DECODE_FILE (converted)); |
| 107 | } | 107 | } |
| 108 | 108 | ||
| 109 | DEFUN ("cygwin-convert-path-to-windows", | 109 | DEFUN ("cygwin-convert-file-name-to-windows", |
| 110 | Fcygwin_convert_path_to_windows, Scygwin_convert_path_to_windows, | 110 | Fcygwin_convert_file_name_to_windows, |
| 111 | Scygwin_convert_file_name_to_windows, | ||
| 111 | 1, 2, 0, | 112 | 1, 2, 0, |
| 112 | doc: /* Convert PATH to a Windows path. If ABSOLUTE-P if | 113 | doc: /* Convert PATH to a Windows path. If ABSOLUTE-P is |
| 113 | non-nil, return an absolute path.*/) | 114 | non-nil, return an absolute path.*/) |
| 114 | (Lisp_Object path, Lisp_Object absolute_p) | 115 | (Lisp_Object path, Lisp_Object absolute_p) |
| 115 | { | 116 | { |
| 116 | return from_unicode ( | 117 | return from_unicode ( |
| 117 | conv_filename_to_w32_unicode (path, EQ (absolute_p, Qnil) ? 0 : 1)); | 118 | conv_filename_to_w32_unicode (path, EQ (absolute_p, Qnil) ? 0 : 1)); |
| 118 | } | 119 | } |
| 119 | 120 | ||
| 120 | DEFUN ("cygwin-convert-path-from-windows", | 121 | DEFUN ("cygwin-convert-file-name-from-windows", |
| 121 | Fcygwin_convert_path_from_windows, Scygwin_convert_path_from_windows, | 122 | Fcygwin_convert_file_name_from_windows, |
| 123 | Scygwin_convert_file_name_from_windows, | ||
| 122 | 1, 2, 0, | 124 | 1, 2, 0, |
| 123 | doc: /* Convert a Windows path to a Cygwin path. If ABSOLUTE-P | 125 | doc: /* Convert a Windows path to a Cygwin path. If ABSOLUTE-P |
| 124 | if non-nil, return an absolute path.*/) | 126 | is non-nil, return an absolute path.*/) |
| 125 | (Lisp_Object path, Lisp_Object absolute_p) | 127 | (Lisp_Object path, Lisp_Object absolute_p) |
| 126 | { | 128 | { |
| 127 | return conv_filename_from_w32_unicode (to_unicode (path, &path), | 129 | return conv_filename_from_w32_unicode (to_unicode (path, &path), |
| @@ -131,6 +133,6 @@ DEFUN ("cygwin-convert-path-from-windows", | |||
| 131 | void | 133 | void |
| 132 | syms_of_cygw32 (void) | 134 | syms_of_cygw32 (void) |
| 133 | { | 135 | { |
| 134 | defsubr (&Scygwin_convert_path_from_windows); | 136 | defsubr (&Scygwin_convert_file_name_from_windows); |
| 135 | defsubr (&Scygwin_convert_path_to_windows); | 137 | defsubr (&Scygwin_convert_file_name_to_windows); |
| 136 | } | 138 | } |
diff --git a/src/w32fns.c b/src/w32fns.c index ed5625e802c..90f5b1695ea 100644 --- a/src/w32fns.c +++ b/src/w32fns.c | |||
| @@ -6167,9 +6167,9 @@ Otherwise, if ONLY-DIR-P is non-nil, the user can only select directories. */) | |||
| 6167 | filename = empty_unibyte_string; | 6167 | filename = empty_unibyte_string; |
| 6168 | 6168 | ||
| 6169 | #ifdef CYGWIN | 6169 | #ifdef CYGWIN |
| 6170 | dir = Fcygwin_convert_path_to_windows (dir, Qt); | 6170 | dir = Fcygwin_convert_file_name_to_windows (dir, Qt); |
| 6171 | if (SCHARS (filename) > 0) | 6171 | if (SCHARS (filename) > 0) |
| 6172 | filename = Fcygwin_convert_path_to_windows (filename, Qnil); | 6172 | filename = Fcygwin_convert_file_name_to_windows (filename, Qnil); |
| 6173 | #endif | 6173 | #endif |
| 6174 | 6174 | ||
| 6175 | CHECK_STRING (dir); | 6175 | CHECK_STRING (dir); |
| @@ -6270,7 +6270,7 @@ Otherwise, if ONLY-DIR-P is non-nil, the user can only select directories. */) | |||
| 6270 | #endif /* NTGUI_UNICODE */ | 6270 | #endif /* NTGUI_UNICODE */ |
| 6271 | 6271 | ||
| 6272 | #ifdef CYGWIN | 6272 | #ifdef CYGWIN |
| 6273 | filename = Fcygwin_convert_path_from_windows (filename, Qt); | 6273 | filename = Fcygwin_convert_file_name_from_windows (filename, Qt); |
| 6274 | #endif /* CYGWIN */ | 6274 | #endif /* CYGWIN */ |
| 6275 | 6275 | ||
| 6276 | /* Strip the dummy filename off the end of the string if we | 6276 | /* Strip the dummy filename off the end of the string if we |