This is the revision history for ln in <matrix.org:#DYJOMClZbVOMHnzPQt:matrix.org>

factoid_idsubjectcopulapredicateauthornamespace
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>