emacs sqlplus déconnecté

Question

J'ai commencé à utiliser sqlplus pour emacs. Cela fonctionne bien sauf une chose - très souvent je reçois un message "Tampon ... ne parle à personne". Dans un fichier sqlplus.el, il y a le code suivant qui vérifie (get-buffer-process process-buffer-name). Comment puis-je maintenir en vie le processus sql?

(defun sqlplus-verify-buffer (connect-string) 
    (let ((output-buffer-name (sqlplus-get-output-buffer-name connect-string)) 
    (process-buffer-name (sqlplus-get-process-buffer-name connect-string))) 
    (when (not (get-buffer process-buffer-name)) 
     (sqlplus-shutdown connect-string) 
     (error "No SQL*Plus session! Use 'M-x sqlplus' to start the SQL*Plus interpreter")) 
    (unless (get-buffer-process process-buffer-name) 
     (sqlplus-shutdown connect-string) 
     (error "Buffer '%s' is not talking to anybody!" output-buffer-name))) 
    t) 

Answer 1

solution possible est un qui suit

(defadvice sqlplus-verify-buffer (before sqlplus-verify-buffer-and-reconnect activate) 
    (unless (get-buffer-process (sqlplus-get-process-buffer-name connect-string)) 
    (sqlplus connect-string)))