Skip to content

Commit

Permalink
Add remote-debug flag
Browse files Browse the repository at this point in the history
  • Loading branch information
mopemope committed Mar 15, 2017
1 parent c7981a4 commit b7cf3a3
Showing 1 changed file with 10 additions and 2 deletions.
12 changes: 10 additions & 2 deletions meghanada.el
Original file line number Diff line number Diff line change
Expand Up @@ -72,7 +72,7 @@
:type 'integer)

(defcustom meghanada-debug nil
"Meghanada server debug mode."
"If true, meghanada-server outputs debug log."
:group 'meghanada
:type 'boolean)

Expand All @@ -96,6 +96,11 @@
:group 'meghanada
:type 'boolean)

(defcustom meghanada-server-remote-debug nil
"If true, meghanda-server enabled remote debug."
:group 'meghanada
:type 'boolean)

(defcustom meghanada-server-install-dir (locate-user-emacs-file "meghanada/")
"Install directory for meghanada-server.
Expand Down Expand Up @@ -253,7 +258,10 @@ function."
(start-process-shell-command
"meghanada-server"
meghanada--server-buffer
(format "java -ea -XX:+TieredCompilation -XX:+UseConcMarkSweepGC -XX:SoftRefLRUPolicyMSPerMB=50 -Xverify:none -Xms256m -Xmx2G -Dfile.encoding=UTF-8 -jar %s -p %d %s"
(format "java %s -ea -XX:+UseConcMarkSweepGC -XX:SoftRefLRUPolicyMSPerMB=50 -Xverify:none -Xms256m -Xmx4G -Dfile.encoding=UTF-8 -jar %s -p %d %s"
(if meghanada-server-remote-debug
"-agentlib:jdwp=transport=dt_socket,server=y,suspend=n,address=5005"
"")
(shell-quote-argument jar)
meghanada-port
(if meghanada-debug
Expand Down

0 comments on commit b7cf3a3

Please sign in to comment.