Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Snap-based config init |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
2ade3d4f87d1b69b2e23961941f9df47 |
User & Date: | bernd 2020-02-25 23:23:12.216 |
Context
2020-02-25
| ||
23:49 | Fix way overcomplicated write-groups check-in: 87d74c78da user: bernd tags: trunk | |
23:23 | Snap-based config init check-in: 2ade3d4f87 user: bernd tags: trunk | |
22:50 | If netlink permission denied, just don't run netlink task check-in: e894818bf1 user: bernd tags: trunk | |
Changes
Changes to tools.fs.
︙ | ︙ | |||
440 441 442 443 444 445 446 447 448 449 450 451 452 453 | $Variable .net2o$ $Variable .net2o-config$ $Variable .net2o-cache$ $Variable invite$ }scope also config : .net2o/ ( addr u -- addr' u' ) [: .net2o$ $. '/' emit type ;] $tmp ; : subdir-config ( -- ) "keys" .net2o/ keys$ $! "chats" .net2o/ chats$ $! "objects" .net2o/ objects$ $! ; | > > | 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 | $Variable .net2o$ $Variable .net2o-config$ $Variable .net2o-cache$ $Variable invite$ }scope $Variable config-file$ "~/.config/net2o/config" config-file$ $! also config : .net2o/ ( addr u -- addr' u' ) [: .net2o$ $. '/' emit type ;] $tmp ; : subdir-config ( -- ) "keys" .net2o/ keys$ $! "chats" .net2o/ chats$ $! "objects" .net2o/ objects$ $! ; |
︙ | ︙ | |||
463 464 465 466 467 468 469 | "SNAP_USER_COMMON" getenv 2dup d0= IF 2drop "~/.local/share/net2o" .net2o$ $! "~/.config/net2o" .net2o-config$ $! "~/.cache/net2o" .net2o-cache$ $! ELSE .net2o$ $! .net2o$ $@ .net2o-config$ $! | | > | 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 | "SNAP_USER_COMMON" getenv 2dup d0= IF 2drop "~/.local/share/net2o" .net2o$ $! "~/.config/net2o" .net2o-config$ $! "~/.cache/net2o" .net2o-cache$ $! ELSE .net2o$ $! .net2o$ $@ .net2o-config$ $! [: .net2o$ $. ." /cache" ;] .net2o-cache$ dup $free $exec [: .net2o-config$ $. ." /config" ;] config-file$ dup $free $exec THEN xdg-dir-config subdir-config ; default-dir-config #2 date# ! #20 logsize# ! |
︙ | ︙ | |||
519 520 521 522 523 524 525 | : fsane-init ( -- ) false to hash-sanitize? false to chat-sanitize? ?.net2o/objects objects/.no-fat-file ?create-file 0= to hash-sanitize? ?.net2o/chats chats/.no-fat-file ?create-file 0= to chat-sanitize? ; | < | 522 523 524 525 526 527 528 529 530 531 532 533 534 535 | : fsane-init ( -- ) false to hash-sanitize? false to chat-sanitize? ?.net2o/objects objects/.no-fat-file ?create-file 0= to hash-sanitize? ?.net2o/chats chats/.no-fat-file ?create-file 0= to chat-sanitize? ; Variable configured? :noname defers 'cold configured? off pad $400 get-dir rootdirs$ $! ; is 'cold :noname ( -- ) |
︙ | ︙ |