From mboxrd@z Thu Jan  1 00:00:00 1970
From: Sebastian Rose <sebastian_rose@gmx.de>
Subject: Re: Pop up reference card
Date: Thu, 31 Jul 2008 18:47:26 +0200
Message-ID: <87hca6t2zl.fsf@kassiopeya.MSHEIMNETZ>
References: <7bef1f890807310737w1c4ea306n17d5db71fbfefec8@mail.gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1KObHw-0005a7-Ge
	for emacs-orgmode@gnu.org; Thu, 31 Jul 2008 12:46:04 -0400
Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1KObHu-0005Yy-TL
	for emacs-orgmode@gnu.org; Thu, 31 Jul 2008 12:46:03 -0400
Received: from [199.232.76.173] (port=51543 helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1KObHu-0005Ym-Nl
	for emacs-orgmode@gnu.org; Thu, 31 Jul 2008 12:46:02 -0400
Received: from mail.gmx.net ([213.165.64.20]:46539)
	by monty-python.gnu.org with smtp (Exim 4.60)
	(envelope-from <sebastian_rose@gmx.de>) id 1KObHu-0000Uq-Jc
	for emacs-orgmode@gnu.org; Thu, 31 Jul 2008 12:46:02 -0400
In-Reply-To: <7bef1f890807310737w1c4ea306n17d5db71fbfefec8@mail.gmail.com>
	(Alan E. Davis's message of "Fri, 1 Aug 2008 00:37:42 +1000")
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: emacs-orgmode Mailinglist <emacs-orgmode@gnu.org>

Hi Alan,

you could use the splash screen feature of emacs for this. I do this, to
display my own keyboard shortcuts (and those I tend to forget).

A screenshot of an older version is here:

http://www.emacswiki.org/cgi-bin/wiki/SebastiansSplashScreenShot

I've bound C-M-k to show the keys and their descriptions. Any click or
keypress will hide them again.


To just add the table as plain text, you could do this:


(defun sr-display-keys()
  "Meine Tastenk=C3=BCrzel nach dem Start anzeigen"
  (interactive)
  (get-buffer-create "sr-info")
  (switch-to-buffer "sr-info" t)
  (with-current-buffer (get-buffer "sr-info")
    ;(setq left-margin-width 20)         ; R=C3=A4nder sind immer Buffer-lo=
kal
    (set-window-buffer (selected-window) "sr-info")
    (let ((map (make-sparse-keymap)))
      (use-local-map map)
      ; (define-key map [t]) w=C3=BCrde auf jedes Mausevent reagieren.
      (define-key map [mouse-1] 'sr-kill-startup-buffer) ; auf Klick reagie=
ren.
      (define-key map [mouse-3] 'sr-kill-startup-buffer) ; auf Klick reagie=
ren.
      (define-key map [mouse-2] 'sr-kill-startup-buffer) ; auf Klick reagie=
ren.
      (define-key map [(control meta ?k)] 'sr-kill-startup-buffer)
      (setq cursor-type nil             ; No Cursor
            display-hourglass nil
            buffer-undo-list t)         ; No Undo.



      (insert "HERE GOES YOUR TEXT (SHORTCUT TABLE)")



      (insert "\n")
      (insert (propertize "------------------------------------------------=
-------------------------------------------------------"
                          'face
                          '( :weight bold :background "RosyBrown1" :foregro=
und "black")))
      (insert "\n\n   Press Key Or Click To Get Rid Of This Buffer\n\n\n")
      (insert "                        ")
      (goto-char (point-min))
      (set-buffer-modified-p nil)
      (make-local-hook 'after-change-functions)
      (add-to-list 'after-change-functions 'sr-kill-startup-buffer)
      )))




"Alan E. Davis" <lngndvs@gmail.com> writes:
> Training wheels.  That's what I need.  One reason I like emacs so much.
> Emacs-the self documenting text editor.
>
> With abundant thanks to Kyle Sherman and his recently updated text org
> card.  I was able to convert this to org-mode, and now have a command to =
pop
> it up:
>
> (defun org-help ()
>   (interactive)
>   (find-file "~/org/help.org"))
> (define-key global-map "\C-c7" 'org-help)
>
> Against my better judgement, I attach this file.  The reason I do not feel
> comfortable is that I have edited some strokes out of it.  And it's not my
> work, generally.
>
> Now I have a question or suggestion.  How difficult would it be to have t=
his
> kind of pop-up help available and generated by org itself.
>
> Some background: Some years ago, I made up a popup feature that would pop=
 up
> all my bindings for a certain prefix keymap.  For example, I had a \C-x6 =
as
> a prefix, and this little card would display keybindings for all the
> functions I bound to these keys.  I also do the same for several other
> prefixes.  I bound this to be displayed when I typed \C-x6 [F1].   Howeve=
r,
> due to a fortuitous event, I stopped writing these up.  I discovered that
> for some reason, and for some prefix maps, inexplicably,  emacs itself ha=
s a
> feature that does this automatically!!!!!!!!!!!!
>
> The result for /C-c is far too limited to be useful for me for org mode, =
but
> it does work.  The converted text reference card is a pretty good place to
> start.  Perhaps org can be programmed to produce one of these.
>
> Thank you Kyle, and everyone else who has contribued to this package.
>
> Alan

--
Sebastian Rose, Hannover, Germany
Phone: +49 173 83 93 417
Mail.: sebatian_rose@gmx.de, s.rose@emma-stil.de