From 5b1df99651e9d39198d736da451ab711f8ef65c9 Mon Sep 17 00:00:00 2001 From: dakkar Date: Tue, 17 May 2016 17:13:55 +0100 Subject: nicer perldoc --- .bash_profile | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 8cad899..eb0bd75 100644 --- a/.bash_profile +++ b/.bash_profile @@ -21,10 +21,14 @@ function se() { emacsclient "${@/#//sudo::}" } +function perldoc() { + cpandoc "$@" +} + function pm() { local fn local ex - fn="$(perldoc -l "$1")" + fn="$(perldoc -lm "$1")" ex=$? if [[ $ex != 0 ]]; then return $ex @@ -32,5 +36,7 @@ function pm() { emacsclient -c -n "$fn" } +export PERLDOC='-MPod::Text::Color::Delight' + fortune -- cgit v1.2.3 From 1b7ffd6c12c04da1b65f1f8a18d85addbcb6b279 Mon Sep 17 00:00:00 2001 From: dakkar Date: Wed, 18 May 2016 10:44:11 +0100 Subject: short alias for perldoc --- .bash_profile | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index eb0bd75..493421b 100644 --- a/.bash_profile +++ b/.bash_profile @@ -21,14 +21,14 @@ function se() { emacsclient "${@/#//sudo::}" } -function perldoc() { +function pd() { cpandoc "$@" } function pm() { local fn local ex - fn="$(perldoc -lm "$1")" + fn="$(pd -lm "$1")" ex=$? if [[ $ex != 0 ]]; then return $ex -- cgit v1.2.3 From 17f4b98c3a959cd33c5a3c6b7242c61b9129ac03 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Thu, 16 Mar 2017 10:12:38 +0000 Subject: perldoc on browser --- .bash_profile | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 493421b..923f310 100644 --- a/.bash_profile +++ b/.bash_profile @@ -22,7 +22,11 @@ function se() { } function pd() { - cpandoc "$@" + if [[ $1 == -b ]]; then + firefox "https://metacpan.org/pod/$2" + else + cpandoc "$@" + fi } function pm() { -- cgit v1.2.3 From 3bcdfc4099c712c04dd7ddb8151c31433cab2c09 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Tue, 3 Jul 2018 10:03:17 +0100 Subject: fix keychain usage turns out, --noask means "don't add keys", not "only add keys that don't need a passphrase" --- .bash_profile | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 923f310..f2d8ae7 100644 --- a/.bash_profile +++ b/.bash_profile @@ -11,7 +11,7 @@ source ~/perl5/perlbrew/etc/bashrc export PATH="${HOME}/bin:${PATH}" export GPG_TTY="$(tty)" -eval "$(keychain --eval --noask --inherit any-once --agents gpg,ssh id_rsa id_ed25519 75193F88 D7A5DBBE)" +eval "$(keychain --eval --inherit any-once --agents ssh id_rsa id_ed25519)" function e() { emacsclient "$@" -- cgit v1.2.3 From a7ae0f848fbe22ebda3afe430ccf8c045f05e989 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sat, 2 Feb 2019 14:13:36 +0000 Subject: use perldoc if no cpandoc --- .bash_profile | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index f2d8ae7..6451c08 100644 --- a/.bash_profile +++ b/.bash_profile @@ -25,7 +25,11 @@ function pd() { if [[ $1 == -b ]]; then firefox "https://metacpan.org/pod/$2" else - cpandoc "$@" + if type cpandoc &>/dev/null; then + cpandoc "$@" + else + perldoc "$@" + fi fi } -- cgit v1.2.3 From 676308091635f8f80939443826dea2b5cf60f5d1 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Tue, 7 Apr 2020 17:27:59 +0100 Subject: never wait for e --- .bash_profile | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 6451c08..7cd8fe4 100644 --- a/.bash_profile +++ b/.bash_profile @@ -14,11 +14,11 @@ export GPG_TTY="$(tty)" eval "$(keychain --eval --inherit any-once --agents ssh id_rsa id_ed25519)" function e() { - emacsclient "$@" + emacsclient -n "$@" } function se() { - emacsclient "${@/#//sudo::}" + emacsclient -n "${@/#//sudo::}" } function pd() { -- cgit v1.2.3 From 63e651046f8f3c647ac71a854c4a5ef61fa66a81 Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Wed, 17 Jun 2020 14:04:01 +0100 Subject: some git stuff --- .bash_profile | 6 ++++++ 1 file changed, 6 insertions(+) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 7cd8fe4..23c06ed 100644 --- a/.bash_profile +++ b/.bash_profile @@ -44,6 +44,12 @@ function pm() { emacsclient -c -n "$fn" } +function killmerged() { + for b in $(git branch --merged HEAD --no-contains HEAD|grep -vE 'stage|master|svn|develop'); do + git branch -d $b && git push origin :$b + done +} + export PERLDOC='-MPod::Text::Color::Delight' fortune -- cgit v1.2.3 From 3925c1d059b0ddecf594f550c8d4e1d3410ca12e Mon Sep 17 00:00:00 2001 From: Gianni Ceccarelli Date: Sat, 20 Mar 2021 14:15:59 +0000 Subject: profile things --- .bash_profile | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to '.bash_profile') diff --git a/.bash_profile b/.bash_profile index 23c06ed..e82048f 100644 --- a/.bash_profile +++ b/.bash_profile @@ -8,7 +8,7 @@ EDITOR=vi export EDITOR source ~/perl5/perlbrew/etc/bashrc -export PATH="${HOME}/bin:${PATH}" +export PATH="${HOME}/bin:${HOME}/.raku/bin:${PATH}" export GPG_TTY="$(tty)" eval "$(keychain --eval --inherit any-once --agents ssh id_rsa id_ed25519)" @@ -45,7 +45,9 @@ function pm() { } function killmerged() { - for b in $(git branch --merged HEAD --no-contains HEAD|grep -vE 'stage|master|svn|develop'); do + for b in $(git branch --merged HEAD --no-contains HEAD|grep -vE 'stage|master|svn|develop|uat'); do + b="${b##+( )}" + b="${b%%+( )}" git branch -d $b && git push origin :$b done } -- cgit v1.2.3