Mercurial > emacs

changeset 94885:a69e407ec0dd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(double_dollars): Remove dead code.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 12 May 2008 18:31:26 +0000
parents 4ea0e968c7af
children 9e19bca35d7f
files src/ChangeLog src/fileio.c
diffstat 2 files changed, 9 insertions(+), 42 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Mon May 12 18:21:24 2008 +0000
+++ b/src/ChangeLog	Mon May 12 18:31:26 2008 +0000
@@ -1,3 +1,7 @@
+2008-05-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* fileio.c (double_dollars): Remove dead code.
+
 2008-05-10  Eli Zaretskii  <eliz@gnu.org>
 
 	* dired.c (Ffile_attributes, Fdirectory_files_and_attributes):
@@ -19,7 +23,7 @@
 
 	* w32.c: Rename the_passwd_* to dflt_passwd_*.
 	(dflt_group_name): New static variable.
-	(dflt_group): Renamed from the_group.
+	(dflt_group): Rename from the_group.
 	(init_user_info): Init dflt_group fields.  Get user's group name
 	from LookupAccountSid.
 	(g_b_init_get_file_security, g_b_init_get_security_descriptor_owner)
@@ -37,8 +41,8 @@
 	(get_file_owner_and_group): New functions.
 	(stat): Use get_file_security_desc and get_file_owner_and_group to
 	report the owner and primary group of each file.  Don't ignore the
-	high 32 bits of file's size, now that st_size is 64-bit wide.  Fix
-	test when to get true file attributes.
+	high 32 bits of file's size, now that st_size is 64-bit wide.
+	Fix test when to get true file attributes.
 	(init_user_info): Use get_rid instead of equivalent inline code.
 	(fstat): Don't ignore the high 32 bits of file's size.
 
@@ -146,8 +150,8 @@
 2008-05-02  Juri Linkov  <juri@jurta.org>
 
 	* minibuf.c (Fread_from_minibuffer, Fread_string, Fread_command)
-	(Fread_variable, Fread_buffer, Fcompleting_read): Document
-	the DEFAULT argument as a list of default values in docstrings.
+	(Fread_variable, Fread_buffer, Fcompleting_read): Document the
+	DEFAULT argument as a list of default values in docstrings.
 
 2008-05-01  Chong Yidong  <cyd@stupidchicken.com>
 
--- a/src/fileio.c	Mon May 12 18:21:24 2008 +0000
+++ b/src/fileio.c	Mon May 12 18:31:26 2008 +0000
@@ -6088,43 +6088,6 @@
 }
 
 /* Reading and completing file names */
-extern Lisp_Object Ffile_name_completion (), Ffile_name_all_completions ();
-extern Lisp_Object Qcompletion_ignore_case;
-
-/* In the string VAL, change each $ to $$ and return the result.  */
-
-static Lisp_Object
-double_dollars (val)
-     Lisp_Object val;
-{
-  register const unsigned char *old;
-  register unsigned char *new;
-  register int n;
-  int osize, count;
-
-  osize = SBYTES (val);
-
-  /* Count the number of $ characters.  */
-  for (n = osize, count = 0, old = SDATA (val); n > 0; n--)
-    if (*old++ == '$') count++;
-  if (count > 0)
-    {
-      old = SDATA (val);
-      val = make_uninit_multibyte_string (SCHARS (val) + count,
-					  osize + count);
-      new = SDATA (val);
-      for (n = osize; n > 0; n--)
-	if (*old != '$')
-	  *new++ = *old++;
-	else
-	  {
-	    *new++ = '$';
-	    *new++ = '$';
-	    old++;
-	  }
-    }
-  return val;
-}
 
 DEFUN ("next-read-file-uses-dialog-p", Fnext_read_file_uses_dialog_p,
        Snext_read_file_uses_dialog_p, 0, 0, 0,