diff options
author | Jesse Luehrs <doy@tozt.net> | 2017-01-15 08:31:24 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2017-01-21 06:37:31 -0500 |
commit | 791400260cbad075f7ec5e6d8cc039d3abdef922 (patch) | |
tree | 0cba6316cf1d4ca708892f71b30a44aa406a0ee3 /aliases | |
parent | 916e0d0de70d3ca4b9a62f3a19f21b523c9a72b7 (diff) | |
download | conf-791400260cbad075f7ec5e6d8cc039d3abdef922.tar.gz conf-791400260cbad075f7ec5e6d8cc039d3abdef922.zip |
remove some unused shell functions
Diffstat (limited to 'aliases')
-rw-r--r-- | aliases | 17 |
1 files changed, 0 insertions, 17 deletions
@@ -151,14 +151,6 @@ function rand_music { echo "select distinct(artist) from $db where artist not in (select distinct(artist) from weekly_tracks);" | sqlite3 ~/.tracks.sqlite | rand_line | sed "s/'/''/" | sed "s/.*/select artist, album from $db where artist = '&' group by artist, album;/" | sqlite3 ~/.tracks.sqlite | rand_line | sed 's/|/ - /' done } -function unread_posts { - pinboard_export --token $(cat ~/.pinboard) --dsn dbi:SQLite:${HOME}/.posts.sqlite - sqlite3 ${HOME}/.posts.sqlite "SELECT href || ' - ' || description FROM posts WHERE toread = 'yes'" -} -function share_posts { - pinboard_export --token $(cat ~/.pinboard) --dsn dbi:SQLite:${HOME}/.posts.sqlite - sqlite3 ${HOME}/.posts.sqlite "SELECT href || ' - ' || description FROM posts WHERE tags like '%share%'" -} function t { if [[ -d blib ]]; then perl -Mblib -MTest::Pretty "$@" @@ -173,15 +165,6 @@ function pt { prove -Mlib::require::all=lib -Pretty -l "$@" t fi } -function 2fa_linode { - oathtool --totp -b $(pass show websites/linode/doy | grep '^2fa:' | sed 's/^2fa: //') -} -function 2fa_github { - oathtool --totp -b $(pass show websites/github/doy | grep '^2fa:' | sed 's/^2fa: //') -} -function 2fa_dynadot { - oathtool --totp -b $(pass show websites/dynadot/doy | grep '^2fa:' | sed 's/^2fa: //') -} function hostcert { openssl s_client -connect "$1" < /dev/null 2>/dev/null | perl -nle 'print if /BEGIN CERTIFICATE/../END CERTIFICATE/' | openssl x509 -text | perl -nle 'print unless /BEGIN CERTIFICATE/../END CERTIFICATE/' } |