[O] Bug: org-publish problem for pictures with thumbnails but without explicit width specification [7.9.3f (release_7.9.3f-17-g7524ef @ /Applications/Emacs.app/Contents/Resources/lisp/org/)]

[Dees, Jonathan]

Dear orgmode developers,

Bug can be reproduces the following way:

Test.org with the content:
>>>
A picture follows.
[[file:img/a.JPG][file:img/a.thumb.JPG]]
<<<

Now use org-publish to generate nice html out of the org file (using the
org-publish-project-alist given in the appendix)
will fail with the following back trace:

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  string-match("width=" nil)
  org-html-handle-links(#("[[file:img/a.JPG][file:img/a.thumb.JPG]]" ...
  byte-code...
  org-export-as-html...
  org-publish-org-to...
  org-publish-org-to-html...
  org-publish-file...
  ...

As it used to work in some previous version of org mode (2 years ago??)
I was curious to find out why it is broken.
Apparently this line brakes it (from backtrace):

org-html.el:1040:
"                              (when (save-match-data (string-match "width=" 
attr))"

It seems that attr is null which makes it fail?!

If I change the original file to have a width everything works flawless:

>>>
A picture follows.
#    +ATTR_HTML: width=256
[[file:img/a.JPG][file:img/a.thumb.JPG]]
<<<

I hope/I think it should not be required to give a width.
Unfortunately I don't know enough Lisp yet to propse a proper fix.
Can you help out?

Thanks,
Jonathan

------------------------------------------------------------------------

Emacs  : GNU Emacs 24.3.1 (x86_64-apple-darwin, NS apple-appkit-1038.36)
 of 2013-03-13 on bob.porkrind.org
Package: Org-mode version 7.9.3f (release_7.9.3f-17-g7524ef @
/Applications/Emacs.app/Contents/Resources/lisp/org/)

current state:
==============
(setq
 org-export-preprocess-before-selecting-backend-code-hook
'(org-beamer-select-beamer-code)
 org-tab-first-hook '(org-hide-block-toggle-maybe
                      org-src-native-tab-command-maybe
                      org-babel-hide-result-toggle-maybe
                      org-babel-header-arg-expand)
 org-speed-command-hook '(org-speed-command-default-hook
                          org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-export-preprocess-before-normalizing-links-hook
'(org-remove-file-link-modifiers)
 org-confirm-shell-link-function 'yes-or-no-p
 org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
                               org-beamer-auto-fragile-frames
                               org-beamer-place-default-actions-for-lists)
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(#[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all
                    append local]
                   5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook
                    org-babel-show-result-all append local]
                   5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes)
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
                          org-babel-execute-safely-maybe)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-export-blocks '((src org-babel-exp-src-block nil)
                     (export-comment org-export-blocks-format-comment t)
                     (ditaa org-export-blocks-format-ditaa nil)
                     (dot org-export-blocks-format-dot nil))
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-export-interblocks '((src org-babel-exp-non-block-elements))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-publish-project-alist '(("org-notes" :base-directory
"~/git/jdees/org/"
                              :base-extension "org" :publishing-directory
                              "~/git/jdees/html/" :auto-sitemap t
:recursive t
                              :publishing-function org-publish-org-to-html
                              :headline-levels 4 :auto-preamble t
:language de
                              :email "[nur j]" :author "dees" :style
                              "<link rel=\"stylesheet\" type=\"text/css\"
href=\"css/stylesheet.css\" />" :link_up sitemap\.html)
                             ("org-static" :base-directory
"~/git/jdees/org/"
                              :base-extension
                   
"css\\|js\\|png\\|jpg\\|gif\\|pdf\\|mp3\\|ogg\\|swf" :publishing-directory
"~/git/jdees/html/" :recursive t :publishing-function
org-publish-attachment)
                             (³jdees" :components ("org-notes"
"org-static"))
                             )
 )