[Orgmode] Re: Display inline images patch

[Gregory J. Grubbs]

"Colin Fraizer" <address@hidden> writes:

> I use org-mode on Windows 7. It seems that the regexp for image files
> excludes the ":" (colon) character. Could it be added to this:
> "[-+./_0-9a-zA-Z]+"
> to make this
> "[-+./:_0-9a-zA-Z]+"
> ?
>

I use a regexp for image files that adds characters often found in
Windows paths, as shown in the following patch in function
org-toggle-inline-images:


--8<---------------cut here---------------start------------->8---
diff --git a/lisp/org.el b/lisp/org.el
old mode 100644
new mode 100755
index ba4ea63..ef8a06c
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -15923,7 +15923,7 @@ BEG and END default to the buffer boundaries."
       (widen)
       (setq beg (or beg (point-min)) end (or end (point-max)))
       (goto-char (point-min))
-      (let ((re (concat 
"\\[\\[\\(\\(file:\\)\\|\\([./~]\\)\\)\\([-+~./_0-9a-zA-Z]+"
+      (let ((re (concat 
"\\[\\[\\(\\(file:\\)\\|\\([./~]\\)\\)\\([-+~.:/\\_0-9a-zA-Z ]+"
                        (substring (org-image-file-name-regexp) 0 -2)
                        "\\)\\]" (if include-linked "" "\\]")))
            old file ov img)

--8<---------------cut here---------------end--------------->8---

It adds ':', space and backslash to the set of characters, so that things like
the following work (org-insert-link sometimes inserts mixed back and forward 
slashes): 

--8<---------------cut here---------------start------------->8---

  [[file:c:/cygwin/usr/share/pixmaps/xterm-color_48x48.xpm]]
  [[~/projects/appointment-soon.png]]
  [[file:c:\Documents and Settings\ggrubbs\projects/appointment-soon.png]]

--8<---------------cut here---------------end--------------->8---




> -----Original Message-----
> From: address@hidden
> [mailto:address@hidden On Behalf Of
> Carsten Dominik
> Sent: Tuesday, June 01, 2010 9:37 AM
> To: Russell Adams
> Cc: emacs-orgmode
> Subject: Re: [Orgmode] Display inline images patch
>
> Hi Russel,
>
> looks like you are not running the latest version, I think this is  
> already fixed....
>
>
> - Carsten
>
> On May 31, 2010, at 9:30 PM, Russell Adams wrote:
>
>> I got irritated by my point jumping to the end of the buffer every
>> time I toggled inline image display, so lets save excursion. ;]
>>
>> $ diff -Narub org.el~ org.el
>> --- org.el~   2010-05-20 10:12:45.000000000 -0500
>> +++ org.el    2010-05-31 14:28:21.000000000 -0500
>> @@ -15489,6 +15489,7 @@
>> is how it will work for export.  When INCLUDE-LINKED is set, also
>> links
>> with a description part will be inlined."
>>   (interactive "P")
>> +  (save-excursion
>>   (org-remove-inline-images)
>>   (goto-char (point-min))
>>   (let ((re (concat "\\[\\[\\(file:\\|\\./\\)\\(~?"
>>   "[-+./_0-9a-zA-Z]+"
>> @@ -15501,7 +15502,7 @@
>>       (setq ov (make-overlay (match-beginning 0) (match-end 0)))
>>       (overlay-put ov 'display (create-image file))
>>       (overlay-put ov 'face 'default)
>> -      (push ov org-inline-image-overlays)))))
>> +          (push ov org-inline-image-overlays))))))
>>
>> (defun org-remove-inline-images ()
>>   "Remove inline display of images."
>>
>>
>>
>>
>>
>>
>> ------------------------------------------------------------------
>> Russell Adams                            address@hidden
>>
>> PGP Key ID:     0x1160DCB3           http://www.adamsinfoserv.com/
>>
>> Fingerprint:    1723 D8CA 4280 1EC9 557F  66E8 1154 E018 1160 DCB3
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> address@hidden
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
> - Carsten
>
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode