Hello,

You can't byte-compile jde-dbs.el because there is a misplaced ")" in the following 
method.

(defmethod jde-dbs-cmd-failure-action ((this jde-dbs-attach-socket))
  (delete-other-windows)
  (let ((source-buffer (current-buffer)))
    (oset this  msg
     (format "Error: cannot attach to process on port %s of %s.\n Reason: %s." 
             (oref this port)
             (if (slot-boundp this 'host)
                 (oref this host)
               "local host")
             (oref this data))
; **** here, a ")" is missing  ****
     (split-window-vertically)
     (pop-to-buffer (oref process msg-buf))
     (pop-to-buffer source-buffer)
     (oset process win-cfg (current-window-configuration)))))
; **** so here, there is a ")" to delete ****

here is the debugged method :

(defmethod jde-dbs-cmd-failure-action ((this jde-dbs-attach-shmem))
  (delete-other-windows)
  (let ((source-buffer (current-buffer)))
    (oset this  msg
     (format "Error: cannot attach process %s.\n Reason: %s." 
                    (oref this process-name)
                    (oref this data)))
    (split-window-vertically)
      (pop-to-buffer (oref process msg-buf))
      (pop-to-buffer source-buffer)
      (oset process win-cfg (current-window-configuration))))


now you can byte-compile jde-2.1.6beta16.

CTE.

Reply via email to