Add gglog-peco function