diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-09-10 09:21:14 +0200 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-09-10 09:21:14 +0200 |
| commit | f7f0445cc18be7fd14aca071ebb74da9a440f06b (patch) | |
| tree | 5d1e5b46e320422762671ce13703df6cac2c1228 | |
| parent | 27101a3e0ee77550f6e45f898e50be5c9b7847b6 (diff) | |
| download | org-mode-f7f0445cc18be7fd14aca071ebb74da9a440f06b.tar.gz | |
eldo.el: Minor tweaks
| -rw-r--r-- | mk/eldo.el | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -90,7 +90,7 @@ (d (get h 'variable-documentation))) (if (> (length val) 30) (setq val (concat (substring val 0 30) "..."))) (insert - " ~" val "~\n" + " =" val "=\n" (if version (format "- *Since:* Emacs version %s\n" version) "") (format (concat "- *In file:* [[" eldo-git-raw-file "][%s]]\n") f f) (format (concat "- [[" eldo-git-search-string @@ -109,7 +109,7 @@ (key (mapconcat 'key-description (where-is-internal c eldo-keymaps) ", ")) (args (help-function-arglist c t)) (d (documentation c))) - (insert "\n** " (symbol-name c) (if args (format " =%s=\n" args) "\n")) + (insert "\n** " (symbol-name c) (if args (format " =%s=\n" args) "\n")) (org-set-property "CUSTOM_ID" (symbol-name c)) (insert (if (and key (not (string= key ""))) (format "\n- *Access:* ~%s~" key) "") @@ -136,7 +136,7 @@ (if (> (length val) 30) (setq val (concat (substring val 0 30) "..."))) (if (> (length type) 30) (setq type (concat (substring type 0 30) "..."))) (insert - " ~" val "~\n\n" + " =" val "=\n\n" (format "- *Type:* %s\n" type) (if version (format "- *Since:* Emacs version %s\n" version) "") (format (concat "- *In file:* [[" eldo-git-raw-file "][%s]]\n") f f) |