--- tuxpaint-0.9.22/src/tuxpaint.c
+++ tuxpaint-0.9.22/src/tuxpaint.c
@@ -7474,11 +7474,21 @@
 static void load_stamps(SDL_Surface * screen)
 {
   char *homedirdir = get_fname("stamps", DIR_DATA);
+  char *stamps_path = getenv("TUXPAINT_STAMPS_PATH");
 
   default_stamp_size = compute_default_scale_factor(1.0);
 
   load_stamp_dir(screen, homedirdir);
   load_stamp_dir(screen, DATA_PREFIX "stamps");
+  /* Load any stamps in TUXPAINT_STAMPS_PATH */
+  if (stamps_path) {
+    char *token;
+    token = strtok(stamps_path, ":");
+    while (token != NULL) {
+      load_stamp_dir(screen, token);
+      token = strtok(NULL, ":");
+    }
+  }
 #ifdef __APPLE__
   load_stamp_dir(screen, "/Library/Application Support/TuxPaint/stamps");
 #endif
koszko' selected='selected'>koszko</option>
<option value='koszko-scripts'>koszko-scripts</option>
</select> <input type='submit' value='switch'/></form></td></tr>
<tr><td class='sub'>Wojtek's customized Guix</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>refs</a><a class='active' href='/guix/log/tests/guix-package.sh'>log</a><a href='/guix/tree/tests/guix-package.sh?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>tree</a><a href='/guix/commit/tests/guix-package.sh?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>commit</a><a href='/guix/diff/tests/guix-package.sh?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/guix-package.sh'>
<input type='hidden' name='id' value='b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>root</a>/<a href='/guix/log/tests?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>tests</a>/<a href='/guix/log/tests/guix-package.sh?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d'>guix-package.sh</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/guix-package.sh?id=b077e3db2a0a6ec3588414f3227419f2b1f8fb4d&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2019-02-07 15:46:45 +0100'>2019-02-07</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=487cbb0164c715e722b622fa800fa0b217fa132c'>profiles: Raise an error for unmatched patterns.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-11-11 23:53:29 +0100'>2018-11-11</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=652163154c06b47936a453f44ea35938789718de'>guix package: '--show' errors when asked for a non-existent package.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-09-21 17:04:37 +0200'>2018-09-21</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=811b21fb15d36b06fde994ca7ef5916a9a19f250'>profiles: 'packages-&gt;manifest' now accepts inferior packages.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-07-13 17:28:39 +0200'>2018-07-13</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=bc6e291ef0b3c71c07e50d88d7764e5dd334e8b1'>guix package: Use relative symlinks to generations.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-06-06 14:37:35 +0200'>2018-06-06</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=477ee222aa796257b5f32966da662e76fe706332'>tests: Adjust 'guix package' test to "python2" name.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-03-31 23:30:50 +0200'>2018-03-31</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=fc95dc4c34bf88ebd8c21752bf6d54b5cf752d1a'>guix package: Add '--allow-collisions'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-02-27 15:46:56 +0100'>2018-02-27</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=0fb405796cdb5579c911b30da9d40b4a18cd7f07'>guix package: '--search' no longer shows superseded packages.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-11-11 15:33:47 +0100'>2017-11-11</span></td><td><a href='/guix/commit/tests/guix-package.sh?id=ae0307f7c2a6f382311a1cedcbbb3d35b6623bab'>tests: Adjust to new unbound-variable error message.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>