X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Ffile-handle.q;h=f1c5f19b14928b2d44c458827ce5cb1c3e5084f4;hb=5ea5547d895d8b0930868378f3eeed39bb3ec731;hp=688fbb89b509b1af790611cb52853525d5ba9fcd;hpb=1339492699ce7e12c9bf9fa17f9d60a66024cbd1;p=pspp

diff --git a/src/file-handle.q b/src/file-handle.q
index 688fbb89b5..f1c5f19b14 100644
--- a/src/file-handle.q
+++ b/src/file-handle.q
@@ -116,7 +116,7 @@ cmd_file_handle (void)
 
   if (!lex_force_id ())
     return CMD_FAILURE;
-  st_trim_copy (handle_name, tokid, sizeof handle_name);
+  str_copy_trunc (handle_name, sizeof handle_name, tokid);
 
   handle = get_handle_with_name (handle_name);
   if (handle != NULL)
@@ -169,7 +169,7 @@ cmd_file_handle (void)
       else if (cmd.n_lrecl[0] < 1)
 	{
 	  msg (SE, _("Record length (%ld) must be at least one byte.  "
-		     "1-character records will be assumed."), cmd.n_lrecl);
+		     "1-character records will be assumed."), cmd.n_lrecl[0]);
           handle->length = 1;
 	}
       else
@@ -235,7 +235,7 @@ mode_name (const char *mode)
 }
 
 
-/* Tries to open FILE with the given TYPE and MODE.
+/* Tries to open handle H with the given TYPE and MODE.
 
    TYPE is the sort of file, e.g. "system file".  Only one given
    type of access is allowed on a given file handle at once.
@@ -391,8 +391,7 @@ handle_get_mode (const struct file_handle *handle)
   return handle->mode;
 }
 
-/* Returns the width of a logical record on HANDLE.  Applicable
-   only to MODE_BINARY files.  */
+/* Returns the width of a logical record on HANDLE. */
 size_t
 handle_get_record_width (const struct file_handle *handle)
 {