mirror of https://github.com/bqv/weechat-xmpp
You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
863 B
EmacsLisp
16 lines
863 B
EmacsLisp
(let ((vterm-shell "/bin/sh -c 'trap \"\" SIGINT ; read < /dev/zero'"))
|
|
(with-current-buffer (vterm t)
|
|
(let ((process (get-buffer-process (current-buffer))))
|
|
(unless (and (boundp 'gud-comint-buffer) gud-comint-buffer)
|
|
(gdb (string-join `("gdb" "-i=mi"
|
|
"-ex 'handle SIGPIPE nostop noprint pass'"
|
|
,(concat "--args weechat -a -P alias,buflist,exec,irc,"
|
|
(expand-file-name "xmpp.so" (projectile-project-root))
|
|
"; /debug tags"))
|
|
" ")))
|
|
(dolist (line
|
|
(list (concat "tty " (process-tty-name process))
|
|
"set env TERM=xterm-256color"))
|
|
(comint-send-string (get-buffer-process gud-comint-buffer)
|
|
(concat line "\n"))))))
|