Bump version number

configure.ac

@@ -15,7 +15,7 @@ dnl Process this file with autoconf to produce a configure script.
 # You should have received a copy of the GNU Affero General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-AC_INIT([net2o], [0.7.2-20180607], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
+AC_INIT([net2o], [0.7.2-20180613], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
 AC_PREREQ([2.59])
 AC_CONFIG_MACRO_DIR([m4])
 AC_USE_SYSTEM_EXTENSIONS

do

@@ -2,7 +2,7 @@
 
 echo "This script builds net2o from scratch"
 
-GFORTH=gforth-0.7.9_20180607
+GFORTH=gforth-0.7.9_20180613
 
 if [ "$(uname -o)" = "Cygwin" ]
 then

helper.fs

@@ -72,7 +72,8 @@ Forward renat-all
 event: :>renat ( -- )  renat-all ;
 event: :>disconnect ( addr -- )  .disconnect-me ;
 : dht-beacon ( addr u -- )
-    <event 0 addr dht-connection !@ elit, :>disconnect ?query-task event>
+    0 addr dht-connection !@
+    ?dup-IF <event elit, :>disconnect ?query-task event> THEN
     <event :>renat main-up@ event> 2drop ;
 
 : dht-connect ( -- )

wiki/commands.md

 # Commands #
 
-Version 0.7.2-20180607.
+Version 0.7.2-20180613.
 
 net2o separates data and commands.  Data is passed through to higher
 layers, commands are interpreted when they arrive.  For connection