Resign key fixed, addr-changed added to Android

parent 0f27a096
......@@ -15,10 +15,12 @@
\ 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/>.
Defer addr-changed ' noop is addr-changed
also android also jni
:noname defers android-network
network-info dup IF ]xref
beacons-now! !!0depth!! true
beacons-now! !!0depth!! addr-changed true
THEN to connected? ;
is android-network
previous previous
......
......@@ -876,7 +876,7 @@ previous
: key-sign ( o:key -- o:key )
['] pack-core gen-cmd$
[: type ke-pk $@ type ;] $tmp
now>never c:0key c:hash ['] .sig $tmp ke-selfsig $! ;
now>never c:0key c:hash [: 0 ..sig ;] $tmp ke-selfsig $! ;
Variable cp-tmp
......
......@@ -278,7 +278,7 @@ scope{ n2o
\U nick newnick
\G nick: Change your nick to <newnick>
?get-me ?nextarg IF pk@ key| key-exist? ?dup-IF
>o ke-nick $! key-sign o> save-keys
>o ke-nick $! key-sign o> save-keys keylist
ELSE 2drop THEN THEN ;
: pet ( -- )
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment