This is the revision history for ln in <freenode.net:#perlbot>
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> |
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> |