|
|
@ -1,12 +1,12 @@
|
|
|
|
(let ((vterm-shell "/bin/sh -c 'trap \"\" SIGINT ; read < /dev/zero'"))
|
|
|
|
(let ((vterm-shell "/bin/sh -c 'trap \"\" SIGINT ; read < /dev/zero'"))
|
|
|
|
(with-current-buffer (vterm t)
|
|
|
|
(with-current-buffer (vterm t)
|
|
|
|
(let ((process (get-buffer-process (current-buffer))))
|
|
|
|
(let ((process (get-buffer-process (current-buffer))))
|
|
|
|
(unless (boundp 'gud-comint-buffer)
|
|
|
|
(unless (and (boundp 'gud-comint-buffer) gud-comint-buffer)
|
|
|
|
(gdb (string-join `("gdb" "-i=mi"
|
|
|
|
(gdb (string-join `("gdb" "-i=mi"
|
|
|
|
"-ex 'handle SIGPIPE nostop noprint pass'"
|
|
|
|
"-ex 'handle SIGPIPE nostop noprint pass'"
|
|
|
|
,(concat "--args weechat -a -P 'alias,buflist,exec,irc' -r '/plugin load "
|
|
|
|
,(concat "--args weechat -a -P alias,buflist,exec,irc,"
|
|
|
|
(expand-file-name "xmpp.so" (projectile-project-root))
|
|
|
|
(expand-file-name "xmpp.so" (projectile-project-root))
|
|
|
|
"'; /debug tags"))
|
|
|
|
"; /debug tags"))
|
|
|
|
" ")))
|
|
|
|
" ")))
|
|
|
|
(dolist (line
|
|
|
|
(dolist (line
|
|
|
|
(list (concat "tty " (process-tty-name process))
|
|
|
|
(list (concat "tty " (process-tty-name process))
|
|
|
|