     (define-key map "\C-c\C-uL" 'ynb-replace-line-with-tex)
     (define-key map "\C-c\C-s" 'ynb-send-cell)
     (define-key map "\C-c\C-uc" 'ynb-update-cell)
+    (define-key map [(control return)] 'ynb-update-cell)
     (define-key map "\C-c\C-uC" 'ynb-tex-update-cell)
+    (define-key map [(meta return)] 'ynb-tex-update-cell)
     (define-key map "\C-c\C-d" 'ynb-delete-output)
     (define-key map "\C-c\C-q" 'ynb-toggle-init)
     (define-key map "\C-c\C-x" 'ynb-package-part)

separated by a ynb-output-marker line."
  (interactive)
  (let ((cell)
        (pt))
    (ynb-delete-output)
    (setq pt (point))
    (setq cell (ynb-get-cell-contents))

    (open-line 1)
    (insert "\\outputtex")
    (forward-line 1)		 ; ..
    (setq pt2 (point))
    (while (string-match "[^ \t\n]" cell)
      (setq end (yacas-find-command-end-string cell))
      (yacas-single-command (substring cell 0 end))
      (yacas-single-command ynb-tex-string)
      (setq cell (substring cell end))
      (setq out (yacas-tex-output))
      (setq jpbout out)
      (if (string-match "mathrm{\\$" out)
          (progn
            (goto-char pt2)
            (insert (ynb-get-maybe-error-message) "\n"))
        (goto-char pt2)
        (insert "\\out " (yacas-tex-output) ";\n"))
      (setq pt2 (point)))
    (goto-char pt)))

(defun ynb-replace-line-with-tex ()
