mutt used inside emacspeak

2019-06-21 Thread Jude DaShiell
I got email from someone who is doing this.  He has only one problem, the
q key doesn't work inside mutt in emacspeak.  I wrote him and told him
he'd have to find a free key and make a macro for it to run the quit
function.



--



Mutt inside emacs

2019-06-21 Thread David J. J. Ring, Jr.
Hello,

I am really happy except for one little thing.

I found out how to get mutt working inside emacs / emacspeak.

The only problem is that I cannot press q to quit, I have to quit emacs instead 
by using Control C Control X (emacs C-c C-x)

I'll go to the emacspeak list or emacs list but I thought I'd ask here first.

I'll paste my .emacs file below if anyone is interested in this.

If I wasted your time, I beg forgiveness, I am just so happy that I have mutt 
talking to me inside emacs!

But does anyone know how I can exit gracefully?

I run emacs and press Shift-F2 and mutt runs!

Regards,
David

; uncomment if you have via voice / outloud and want that voice as default.
;(setenv "DTK_PROGRAM" "outloud")
;(load-file 
"/home/djringjr/Programs/emacspeak_voxin_install-48.0-1/lisp/emacspeak-setup.el")
(server-start)
(add-to-list 'load-path "/usr/share/emacs/site-lisp/mu4e/")
(require 'mu4e-multi)
(set-face-attribute 'default nil :height 150)

(load-file "/home/djringjr/Programs/emacspeak-49.0/lisp/emacspeak-setup.el")

;; From running console programs inside emacs
;; 
http://emacs-fu.blogspot.com/2008/12/running-console-programs-inside-emacs.html

(defun djcb-term-start-or-switch (prg  use-existing)
  "* run program PRG in a terminal buffer. If USE-EXISTING is non-nil "
  " and PRG is already running, switch to that buffer instead of starting"
  " a new instance."
  (interactive)
  (let ((bufname (concat "*" prg "*")))
(when (not (and use-existing
 (let ((buf (get-buffer bufname)))
   (and buf (buffer-name (switch-to-buffer bufname))
  (ansi-term prg prg

;; add macro to define key values
(defmacro djcb-program-shortcut (name key  use-existing)
  "* macro to create a key binding KEY to start some terminal program PRG; 
if USE-EXISTING is true, try to switch to an existing buffer"
  `(global-set-key ,key 
 '(lambda()
(interactive)
(djcb-term-start-or-switch ,name ,use-existing

;; define key values

;; terminal programs are under Shift + Function Key
(djcb-program-shortcut "zsh"   (kbd "") t)  ; the ubershell
(djcb-program-shortcut "mutt"  (kbd "") t)  ; mail client
(djcb-program-shortcut "slrn"  (kbd "") t)  ; nttp client
(djcb-program-shortcut "htop"   (kbd "") t)  ; my processes
(djcb-program-shortcut "mc" (kbd "") t)  ; midnight commander
(djcb-program-shortcut "raggle"(kbd "") t)  ; rss feed reader
(djcb-program-shortcut "irssi" (kbd "") t)  ; irc client

;; end keybindings

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(line-number-mode nil)
 '(send-mail-function (quote mailclient-send-it)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )


signature.asc
Description: PGP signature


re: mutt inside of emacspeak

2019-06-21 Thread Jude DaShiell
This may not be the neatest way to smash a mouse, but inside of mutt I
suggested typing:
:exec quit , works here.  The q key inside emacspeak has other
functions.


--