Nope, I didn't edit it. If I did, I would have also fixed all the grammar/spelling mistakes as well(lol). But just for the sake of doing it, here's an even shorter version:
Code:
alias Aliases {
  if (!$isfile($1-)) { return 0 }
  filter -fkg $qt($1-) noop /^ $+ $iif(*.ini iswm $1-,n\d+=) $+ \s*alias(?: |$)/i               
  return $filtered
}

Ok, now that I'm done editing things here, let me make a note. All the snippets presented here have a flaw, though not MAJOR it's still a flaw; they ALL count aliases commented out with /**/

For the sake of speed and simplicity, even though I realized the bug above, I did it this way. If you'd like a version that DOESN'T count those then hit me back and I might get around to it.

Last edited by FroggieDaFrog; 04/03/11 07:06 AM.