; Last-minute updates to Android port

* lisp/electric.el:
* lisp/help-macro.el (make-help-screen):
* lisp/subr.el (read-char-choice-with-read-key):
* src/buffer.c (init_buffer_once):
* src/dispextern.h (No_Cursor):
* src/keyboard.c (read_char):
* src/process.c (Fprocess_send_eof): Fix commentary or unnecessary
whitespace changes.

lisp/electric.el

@@ -294,7 +294,6 @@ or comment."
 
 ;;;###autoload
 (define-key global-map "\C-j" 'electric-newline-and-maybe-indent)
-
 ;;;###autoload
 (defun electric-newline-and-maybe-indent ()
   "Insert a newline.

lisp/help-macro.el

@@ -166,7 +166,7 @@ and then returns."
                      (error nil))
                    (let ((cursor-in-echo-area t)
                          (overriding-local-map local-map))
-                     (frame-toggle-on-screen-keyboard nil nil)
+                     (frame-toggle-on-screen-keyboard (selected-frame) nil)
                      (setq key (read-key-sequence
                                 (format "Type one of listed options%s: "
                                         (if (pos-visible-in-window-p

lisp/subr.el

@@ -3348,7 +3348,7 @@ causes it to evaluate `help-form' and display the result."
 	  (unless (get-text-property 0 'face prompt)
 	    (setq prompt (propertize prompt 'face 'minibuffer-prompt)))
           ;; Display the on screen keyboard if it exists.
-          (frame-toggle-on-screen-keyboard nil t)
+          (frame-toggle-on-screen-keyboard (selected-frame) nil)
 	  (setq char (let ((inhibit-quit inhibit-keyboard-quit))
 		       (read-key prompt)))
 	  (and show-help (buffer-live-p (get-buffer helpbuf))

src/buffer.c

@@ -4791,9 +4791,7 @@ init_buffer_once (void)
 #ifdef HAVE_TREE_SITTER
   bset_ts_parser_list (&buffer_defaults, Qnil);
 #endif
-#ifdef HAVE_TEXT_CONVERSION
   bset_text_conversion_style (&buffer_defaults, Qnil);
-#endif
   bset_cursor_in_non_selected_windows (&buffer_defaults, Qt);
 
   bset_enable_multibyte_characters (&buffer_defaults, Qt);

src/dispextern.h

@@ -57,7 +57,6 @@ typedef struct
 /* Accommodate X's usage of None as a null resource ID.  */
 #define No_Cursor (NULL)
 #else
-/* Android doesn't support cursors and also uses handles.  */
 #define No_Cursor 0
 #endif
 

src/keyboard.c

@@ -3053,9 +3053,6 @@ read_char (int commandflag, Lisp_Object map,
       struct buffer *prev_buffer = current_buffer;
       last_input_event = c;
 
-      /* All a `text-conversion' event does is prevent Emacs from
-	 staying idle.  It is not useful.  */
-
       call4 (Qcommand_execute, tem, Qnil, Fvector (1, &last_input_event), Qt);
 
       if (CONSP (c) && !NILP (Fmemq (XCAR (c), Vwhile_no_input_ignore_events))

src/process.c

@@ -7252,7 +7252,7 @@ process has been transmitted to the serial port.  */)
 #if !defined WINDOWSNT && defined HAVE_TCDRAIN
       if (tcdrain (XPROCESS (proc)->outfd) != 0)
 	report_file_error ("Failed tcdrain", Qnil);
-#endif /* not WINDOWSNT */
+#endif /* not WINDOWSNT && not TCDRAIN */
       /* Do nothing on Windows because writes are blocking.  */
     }
   else