.
;;
;; (concat "
"
;; "
"
;; "
"
;; "
" text ""
;; "
")
(concat "
"
""
" "
"" text ""
" |
")
(concat "
" text ""))))
(defun org-freemind-convert-links-from-org (org-str)
"Convert org links in ORG-STR to freemind links and return the result."
(let ((fm-str (replace-regexp-in-string
;;(rx (not (any "[\""))
;; (submatch
;; "http"
;; (opt ?\s)
;; "://"
;; (1+
;; (any "-%.?@a-zA-Z0-9()_/:~="))))
"[^\"[]\\(http ?://[--:#%&()=?-Z_a-z~]+\\)"
"[[\\1][\\1]]"
org-str
nil ;; fixedcase
nil ;; literal
1 ;; subexp
)))
(replace-regexp-in-string
;;(rx "[["
;; (submatch (*? nonl))
;; "]["
;; (submatch (*? nonl))
;; "]]")
"\\[\\[\\(.*?\\)]\\[\\(.*?\\)]]"
;;"
\\2"
'org-freemind-convert-links-helper
fm-str t t)))
I am not trying to muddy the waters here, it is just that when I type a
link into org-mode, I do not seem to get a usable freemind link as a result.
On Tue, Sep 18, 2012 at 10:12 PM, Bill Day
wrote:
> Sorry, yes, I mistyped -- it is org-freemind.el.
>
> When I type:
>
> * Mind Map
> ** test [[http://orgmode.org][Org Mode]]
>
> I get this:
>
>
>
> Is this the expected behavior?
>
>
>
> On Tue, Sep 18, 2012 at 3:30 AM, Bastien wrote:
>
>> Hi Bill,
>>
>> Bill Day writes:
>>
>> > I am using org-mode 7.9.1 and Freemind 0.9.0. Freemind.el seems to
>> > convert nodes from org to Freemind with no problem, but it simply
>> > copies the code for links from org to Freemind without converting
>> > it.
>>
>> I'm not sure i understand -- are you talking about org-freemind.el?
>>
>>
>> http://orgmode.org/w/?p=org-mode.git;a=blob_plain;f=lisp/org-freemind.el;hb=HEAD
>>
>> > Has anyone else had this problem?
>>
>> AFAIU I don't.
>>
>> This link in .org:
>>
>> A [[http://orgmode.org][link]].
>>
>> gets exported as
>>
>> A link.
>>
>> in .mm
>>
>> HTH,
>>
>> --
>> Bastien
>>
>
>
>
> --
> Bill Day
> williamson.day@gmail.com
>
--
Bill Day
williamson.day@gmail.com