From e48435d13a4c9ee28ed0dd83bc031a28c53c1741 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Thu, 6 Dec 2012 03:38:40 +0000
Subject: if image is set to blank, then use filler image and post error
 message

svn path=/trunk/externals/moonlib/; revision=16650
---
 image.c   |  6 ++++++
 image.tcl | 11 +++++++++++
 2 files changed, 17 insertions(+)

diff --git a/image.c b/image.c
index 79cb3ac..f95a3e9 100644
--- a/image.c
+++ b/image.c
@@ -48,6 +48,12 @@ void image_drawme(t_image *x, t_glist *glist, int firsttime)
 {
     if (firsttime)
     {
+        if (x->x_image == &s_) // if we have a blank image name, use the included filler
+        {
+            x->x_image = gensym("::moonlib::image::noimage");
+            x->x_type = 1;
+            pd_error(x, "[image]: no image found");
+        }
         if(x->x_type)
         {
             sys_vgui(".x%lx.c create image %d %d -tags %xS\n",
diff --git a/image.tcl b/image.tcl
index 7f4f22c..8bed3dc 100644
--- a/image.tcl
+++ b/image.tcl
@@ -13,3 +13,14 @@ proc ::moonlib::image::create_photo {obj_id img filename} {
         ::pdwindow::logpost $obj_id 1 "[image]: error reading '$filename':\n$fid\n"
     }
 }
+
+image create photo ::moonlib::image::noimage -data {
+    R0lGODlhDwARANU8AAAAAP6xDv/yHP6kDP6oCv7FEP/pGUY6J/7KEP7CD//tG/6sCurp6FVLM+/v
+    7vzhGP7SE/61DtfW05pwG/7ZFXFjOmNWM31yXv65Dv69D/nuIu+9Em5hRmlcO1FELv///1tILLWW
+    I/b29v/kGOubD/7cFteMEYBdJoiAbpKMeJuYjWNXQF9UOrq4stmYEui/FoqEc3VoRZWQfMCBEtbG
+    MO3VHe6qEObUOZiDQ+2wEcJ/EnluWf///wAAAAAAAAAAACH5BAEAADwALAAAAAAPABEAQAa1QJ5Q
+    JIt1Kh1OSiTkNSAQgBRRSEgBgcChKWxdOLsWl5eiKQRoheFBQSQKExjvMsFErtLBYHIRqnAaaAIG
+    axQvFio8Fg94ACWNGB4oIQWVCRFZCwQEeyhCDAcumpwDJgcMXBIVN4FqNSErEkIOCoGCBiNtCBsH
+    DiwPhApqIyUQVRk5HhUUVx8AUVLOASAKGwhUx1mZJAoSFhgZAJgBmgCcILIOBzaYo3okvVwMKycz
+    JjonLKhCQQA7
+}
-- 
cgit v1.2.1