Copied from Fedora.

http://pkgs.fedoraproject.org/cgit/libwmf.git/tree/libwmf-0.2.8.4-CVE-2007-3477.patch

--- libwmf-0.2.8.4/src/extra/gd/gd.c
+++ libwmf-0.2.8.4/src/extra/gd/gd.c
@@ -1335,10 +1335,31 @@
   int w2, h2;
   w2 = w / 2;
   h2 = h / 2;
-  while (e < s)
-    {
-      e += 360;
-    }
+
+  if ((s % 360)  == (e % 360)) {
+         s = 0; e = 360;
+  } else {
+         if (s > 360) {
+                 s = s % 360;
+         }
+
+         if (e > 360) {
+                 e = e % 360;
+         }
+
+         while (s < 0) {
+                 s += 360;
+         }
+
+         while (e < s) {
+                 e += 360;
+         }
+
+         if (s == e) {
+                 s = 0; e = 360;
+         }
+  }
+
   for (i = s; (i <= e); i++)
     {
       int x, y;
o</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=97ef6df5ecec825712c1253551d5be1ab7d89b06'>refs</a><a class='active' href='/guix/log/gnu/packages/dlang.scm'>log</a><a href='/guix/tree/gnu/packages/dlang.scm?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>tree</a><a href='/guix/commit/gnu/packages/dlang.scm?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>commit</a><a href='/guix/diff/gnu/packages/dlang.scm?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/dlang.scm'>
<input type='hidden' name='id' value='97ef6df5ecec825712c1253551d5be1ab7d89b06'/><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=97ef6df5ecec825712c1253551d5be1ab7d89b06'>root</a>/<a href='/guix/log/gnu?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>gnu</a>/<a href='/guix/log/gnu/packages?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>packages</a>/<a href='/guix/log/gnu/packages/dlang.scm?id=97ef6df5ecec825712c1253551d5be1ab7d89b06'>dlang.scm</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/gnu/packages/dlang.scm?id=97ef6df5ecec825712c1253551d5be1ab7d89b06&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2018-09-10 17:47:52 +0200'>2018-09-10</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=98d6543f86d01486c2f6e808eedd97c601ba3e7a'>gnu: Rename ldc.scm to dlang.scm.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/ldc.scm: Rename to...
* gnu/packages/dlang.scm: ... this.
* gnu/local.mk (GNU_SYSTEM_MODULES): Adjust accordingly.
</span></span></td><td>Pjotr Prins</td></tr>
cthing-shepherd-service` failing to guess the correct `HOME`
environment variable when it's `&lt;syncthing-configuration&gt;` does not have a
value for the `home` or `user` fields.

* gnu/services/syncthing.scm (syncthing-shepherd-service): Change ‘HOME’
value in #:environment-variables argument.

Change-Id: I102bfe5feba1ebb349a0cde1c987c0c10ebbab7a
Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Sergio Pastor Pérez</td></tr>
<tr><td><span title='2023-09-17 15:31:03 +0200'>2023-09-17</span></td><td><a href='/guix/commit/gnu/services/syncthing.scm?id=944c1b62a1b36d6383b8e902f1a4abbee0165e34'>services: syncthing: Ensure that service runs after mounting home directories.</a><span class='msg-avail'>...<span class='msg-tooltip'>Sometimes `syncthing-service-type' fails during startup because it tries
to read configuration files from the user's home directory:

Failure on home directory: mkdir /home/xyz/.config: permission denied

This patch adds `user-processes' to the shepherd service requirements to
ensure that `user-homes' is fired before `syncthing' tries to read data
from the home directory.

* gnu/services/syncthing.scm (syncthing-shepherd-service): add
`user-processes' to requirements

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Adam Maleszka</td></tr>
<tr><td><span title='2023-08-20 22:48:48 +0200'>2023-08-20</span></td><td><a href='/guix/commit/gnu/services/syncthing.scm?id=7605c01fccb20b387f5a0d98d6b81074b3039e23'>home: services: Add Syncthing.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/home/services/syncthing.scm: New file.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
* gnu/services/syncthing.scm (&lt;syncthing-configuration&gt;)[home-service?]:
New field.
Adjust 'provision' and 'requirement' depending on 'home-service?', and
likewise for #:user and #:group.
Use 'filter' + 'negate' instead of 'remove'.
* doc/guix.texi (Networking Services): Add note and cross-reference to
"Networking Home Services".
(Networking Home Services): New node.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-08-20 22:48:39 +0200'>2023-08-20</span></td><td><a href='/guix/commit/gnu/services/syncthing.scm?id=c6c8106c65bc1edcbb67e4ccfdc81c01aa4afd5f'>services: syncthing: Use 'match-record'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/syncthing.scm (syncthing-shepherd-service): Use
'match-record-lambda' instead of 'match-lambda'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2023-08-11 00:50:48 +0200'>2023-08-11</span></td><td><a href='/guix/commit/gnu/services/syncthing.scm?id=56fddefc6de3b0c1f2ccb9559d86ba08d2e429b9'>services: syncthing: Use the new command line syntax.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/syncthing.scm (syncthing-shepherd-service): Use the new command line syntax.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>terramorpha</td></tr>