emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* [patch] contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but not fbound
@ 2011-09-25 16:21 David Maus
  2011-10-06  8:14 ` [Accepted] " Carsten Dominik
  0 siblings, 1 reply; 2+ messages in thread
From: David Maus @ 2011-09-25 16:21 UTC (permalink / raw)
  To: emacs-orgmode; +Cc: bzg


[-- Attachment #1.1: Type: text/plain, Size: 272 bytes --]

Another small patch for org-elisp-symbol: Set the symbol type to
"Function or command" if it is defuned but not fbound when
`org-elisp-symbol-store-link' is called.

Best,
  -- David
--
OpenPGP... 0x99ADB83B5A4478E6
Jabber.... dmjena@jabber.org
Email..... dmaus@ictsoc.de

[-- Attachment #1.2: 0001-Set-symbol-type-if-defun-but-symbol-not-fbound.patch --]
[-- Type: text/plain, Size: 1015 bytes --]

From 09f5f322d418afe34503d8758ad123cd6c8045a0 Mon Sep 17 00:00:00 2001
From: David Maus <dmaus@ictsoc.de>
Date: Sun, 25 Sep 2011 18:16:54 +0200
Subject: [PATCH] Set symbol type if defun but symbol not fbound

* org-elisp-symbol.el (org-elisp-symbol-store-link): Set symbol type
if defun but symbol not fbound.

If the symbol is not fbound but defuned, set type to "function or
command".
---
 contrib/lisp/org-elisp-symbol.el |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/contrib/lisp/org-elisp-symbol.el b/contrib/lisp/org-elisp-symbol.el
index 6eb8114..340272b 100644
--- a/contrib/lisp/org-elisp-symbol.el
+++ b/contrib/lisp/org-elisp-symbol.el
@@ -106,6 +106,7 @@
 			  ((user-variable-p sym-name) "User variable")
 			  ((string= def "defvar") "Variable")
 			  ((string= def "defmacro") "Macro")
+			  ((string= def "defun") "Function or command")
 			  (t "Symbol")))
 	     (args (if (match-string 3)
 		       (mapconcat (lambda (a) (unless (string-match "^&" a) a))
-- 
1.7.2.5


[-- Attachment #2: Type: application/pgp-signature, Size: 230 bytes --]

^ permalink raw reply related	[flat|nested] 2+ messages in thread

* [Accepted] contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but not fbound
  2011-09-25 16:21 [patch] contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but not fbound David Maus
@ 2011-10-06  8:14 ` Carsten Dominik
  0 siblings, 0 replies; 2+ messages in thread
From: Carsten Dominik @ 2011-10-06  8:14 UTC (permalink / raw)
  To: emacs-orgmode

Patch 962 (http://patchwork.newartisans.com/patch/962/) is now "Accepted".

Maintainer comment: none

This relates to the following submission:

http://mid.gmane.org/%3C8739fkpp7v.wl%25dmaus%40ictsoc.de%3E

Here is the original message containing the patch:

> Content-Type: text/plain; charset="utf-8"
> MIME-Version: 1.0
> Content-Transfer-Encoding: 7bit
> Subject: [O] contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but
> 	not fbound
> Date: Sun, 25 Sep 2011 21:21:40 -0000
> From: David Maus <dmaus@ictsoc.de>
> X-Patchwork-Id: 962
> Message-Id: <8739fkpp7v.wl%dmaus@ictsoc.de>
> To: emacs-orgmode@gnu.org
> Cc: bzg@altern.org
> 
> Another small patch for org-elisp-symbol: Set the symbol type to
> "Function or command" if it is defuned but not fbound when
> `org-elisp-symbol-store-link' is called.
> 
> Best,
>   -- David
> 
> ---
> OpenPGP... 0x99ADB83B5A4478E6
> Jabber.... dmjena@jabber.org
> Email..... dmaus@ictsoc.de
> >From 09f5f322d418afe34503d8758ad123cd6c8045a0 Mon Sep 17 00:00:00 2001
> From: David Maus <dmaus@ictsoc.de>
> Date: Sun, 25 Sep 2011 18:16:54 +0200
> Subject: [PATCH] Set symbol type if defun but symbol not fbound
> 
> * org-elisp-symbol.el (org-elisp-symbol-store-link): Set symbol type
> if defun but symbol not fbound.
> 
> If the symbol is not fbound but defuned, set type to "function or
> command".
> ---
>  contrib/lisp/org-elisp-symbol.el |    1 +
>  1 files changed, 1 insertions(+), 0 deletions(-)
> 
> diff --git a/contrib/lisp/org-elisp-symbol.el b/contrib/lisp/org-elisp-symbol.el
> index 6eb8114..340272b 100644
> --- a/contrib/lisp/org-elisp-symbol.el
> +++ b/contrib/lisp/org-elisp-symbol.el
> @@ -106,6 +106,7 @@
>  			  ((user-variable-p sym-name) "User variable")
>  			  ((string= def "defvar") "Variable")
>  			  ((string= def "defmacro") "Macro")
> +			  ((string= def "defun") "Function or command")
>  			  (t "Symbol")))
>  	     (args (if (match-string 3)
>  		       (mapconcat (lambda (a) (unless (string-match "^&" a) a))
> 

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2011-10-06  8:14 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2011-09-25 16:21 [patch] contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but not fbound David Maus
2011-10-06  8:14 ` [Accepted] " Carsten Dominik

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).