(add-to-list 'auto-mode-alist '("\\.tex$" . LaTeX-mode))

(defun latex-sentinel (process event)
      (message event)
      (when (string-match-p "finished" event)
            (message "pdflatex done")
            (latex-close-compile-window)))


(defun latex-kill-async-pdflatex ()
      (interactive)
      (latex-close-compile-window)
)

(defun latex-close-compile-window ()
      ""
      (kill-buffer "*async pdflatex*")
      (delete-other-windows)
      )

(defun latex-compile ()
      "Runs pdflatex on current file"
      (interactive)
      (let* ((file-name (shell-quote-argument (buffer-file-name)))
            (process (start-process-shell-command
                           "pdflatex"
                           "*async pdflatex*"
                           (concat "pdflatex " file-name))))
            (set-process-sentinel process 'latex-sentinel)
            (setq new-window (split-window-below 30))
            (set-window-buffer new-window "*async pdflatex*")
			(other-window 1)
            (set-process-query-on-exit-flag process nil)
            (local-set-key [t] 'latex-kill-async-pdflatex)
            ))

(add-hook 'LaTeX-mode-hook (lambda () (define-key LaTeX-mode-map (kbd "<f2>") 'latex-compile)))
(add-hook 'latex-mode-hook (lambda () (define-key latex-mode-map (kbd "<f2>") 'latex-compile)))