📙: fix premature reset on debounce named with immediate

lively.lang/function.js

@@ -312,6 +312,7 @@ function throttle (func, wait) {
  * delay(curry(f, "call3"), 0.15);
  * // => Will eventually output: "running after 352ms with arg call3"
  */
+
 function debounce (wait, func, immediate) {
   let timeout;
   return function () {
@@ -361,8 +362,8 @@ function debounceNamed (name, wait, func, immediate) {
   const store = _debouncedByName;
   if (store[name]) return store[name];
   function debounceNamedWrapper () {
-    // ignore-in-doc, cleaning up
-    delete store[name];
+    if (!immediate) delete store[name];
+    else setTimeout(() => delete store[name], wait);
     return func.apply(this, arguments);
   }
   return store[name] = debounce(wait, debounceNamedWrapper, immediate);

lively.lang/tests/function-test.js

@@ -83,12 +83,28 @@ describe('fun', function () {
         var i = setInterval(function () {
           if (typeof result === 'undefined') return;
           clearInterval(i);
-          expect(called).to.equal(1, 'debounce call cound');
+          expect(called).to.equal(1, 'debounce call count');
           expect(result).to.equal(10, 'debounce result');
           done();
         }, 0);
       });
 
+      it('properly debounces named if immediate execution enabled', async function () {
+        let called = 0; let result;
+        fun.debounceNamed('testDebouncedCommandNamed', 20,
+          function (i) { result = i; called++; }, true)(1);
+        await promise.delay(10);
+        fun.debounceNamed('testDebouncedCommandNamed', 20,
+          function (i) { result = i; called++; }, true)(2);
+        await promise.delay(10);
+        fun.debounceNamed('testDebouncedCommandNamed', 20,
+          function (i) { result = i; called++; }, true)(3);
+        await promise.delay(20);
+
+        expect(called).to.equal(2, 'debounce call count');
+        expect(result).to.equal(3, 'debounce result');
+      });
+
       it('throttles calls', function (done) {
         let called = 0; let result = [];