This is the revision history for ln in <discord.gg:#413390663502135296>
factoid_id | subject | copula | predicate | author | namespace |
---|---|---|---|---|---|
12728 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] existing_factoid new_factoid>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Stored async is [fact events [arg]] |
simcop2387 | <*:##NULL> |
12727 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] source_file target_file>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12726 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] source dest>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12700 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] source dest>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12699 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12697 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12679 | ln | is | [fact ##NULL ln [arg]] Not Available |
simcop2387 | <*:##NULL> |
12678 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12677 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg!!;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"!! Not Available |
simcop2387 | <*:##NULL> |
12637 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12634 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | <*:##NULL> |
12633 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12632 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact macro $r is <fact $l>>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12631 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; "<fact macro $r is [fact $l [arg]]>" if $s; return [$a, $s, $l, $r]; "<fact macro $r is <fact $l>>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12630 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; "<fact macro $r is [fact $l [arg]]>" if $s; "<fact macro $r is <fact $l>>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12629 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$c=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; "<fact macro $r is [fact $l [arg]]>" unless $c; "<fact macro $r is <fact $l>>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12628 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$c=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; "<fact macro $r is [fact $l [arg]]>"~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12627 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~;$c=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if (@$a!=2) {"<echo Syntax: ln [-s] one two>"}~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12626 | ln | is | `eval $a=`fact _getarg_perl_array `arg~~; ~ Not Available |
simcop2387 | <freenode.net:#perlbot> |
12625 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~; "echo $a"~~ Not Available |
simcop2387 | <freenode.net:#perlbot> |