From: Florian Lindner <Florian.Lindner@xgm.de>
Subject: Re: Key binding
Date: Mon, 25 Nov 2002 17:18:36 +0000 [thread overview]
Message-ID: <artiub$ldn$06$1@news.t-online.com> (raw)
In-Reply-To: 84el9adloh.fsf@lucy.cs.uni-dortmund.de
Kai Großjohann wrote:
> Florian Lindner <Florian.Lindner@xgm.de> writes:
>
>> (define-key pascal-mode-map "\C-c\v" '(shell-command
>> (file-name-sans-extension (buffer-file-name))))
>
> (defun fl-execute-current-buffer ()
> "doc string here"
> (interactive)
> (shell-command (file-name-sans-extension (buffer-file-name))))
> (define-key pascal-mode-map (kbd "C-c v") 'fl-execute-current-buffer)
Thanks,
it's not really working.
That's how it looks like now:
(add-hook 'pascal-mode-hook
(lambda()
[..]
(defun fl-execute-current-buffer ()
"Executes the compiled file"
(interactive)
(shell-command (file-name-sans-extension buffer-file-name)))
(define-key pascal-mode-map (kbd "C-c v") 'fl-execute-current-buffer)))
I've I execute this it just displays in the minibuffer:
Filename: Runtime error 201 at 0x0805C0DA
(some more hex codes)
Filename is the output my program gives right before it is waiting for
input.
If I just execute the program in a bash shell it works ok, I can enter
something.
A weird problem also apperas if I try to execute the program in the shell
mode (M-x shell), it scrolling thousands of lines with withspaces down.
Everything works on a normal shell.
Any ideas?
Thanks,
Florian
next prev parent reply other threads:[~2002-11-25 17:18 UTC|newest]
Thread overview: 21+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-11-24 21:22 Key binding Florian Lindner
2002-11-25 9:48 ` Kai Großjohann
2002-11-25 17:18 ` Florian Lindner [this message]
2002-11-25 17:47 ` Kai Großjohann
2002-11-25 21:48 ` Florian Lindner
2002-11-25 17:51 ` Kevin Rodgers
2002-11-25 21:49 ` Florian Lindner
2002-11-25 22:51 ` Kevin Rodgers
2002-11-25 23:04 ` fabrice bauzac
2002-11-26 16:25 ` Florian Lindner
2002-11-26 16:32 ` Kester Clegg
2002-11-26 17:45 ` Kai Großjohann
-- strict thread matches above, loose matches on Subject: below --
2003-11-27 5:35 key binding Jason
2003-11-27 6:52 ` Eli Zaretskii
[not found] ` <mailman.699.1069919563.399.help-gnu-emacs@gnu.org>
2003-11-27 7:43 ` Jason
2003-11-27 14:23 ` Eli Zaretskii
[not found] ` <mailman.726.1069946597.399.help-gnu-emacs@gnu.org>
2003-11-28 0:27 ` Jason
2003-11-28 3:53 ` leo
2014-02-04 22:18 Mickey Ferguson
2014-02-05 1:53 ` Stefan Monnier
2014-02-05 20:12 Mickey Ferguson
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='artiub$ldn$06$1@news.t-online.com' \
--to=florian.lindner@xgm.de \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.