etc/profile.d/functions

diff --git a/etc/profile.d/functions b/etc/profile.d/functions
index 82159cc9f4fbcf11b988eaa712ab575b2299a03c..c3259575e91a85a59f0199411f1a626e54b46449 100644 (file)
--- a/etc/profile.d/functions
+++ b/etc/profile.d/functions
@@ -163,7 +163,8 @@ shell_help_noarg() {
 
 shell_functions() {
 # NB 15.02.16   set | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1\n"'
-  typeset -f | perl -ne '/^([a-z][\w_-]+) \(\)\s*\{*$/ and print "$1\n"'
+  typeset -f | awk '/^[a-z]+[a-zA-Z0-9_]+/{print $1}'
+# NB 07.02.17   typeset -f | perl -ne '/^([a-z][\w_-]+) \(\)\s*\{*$/ and print "$1\n"'
   #set | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1 "' | perl -pe 's/\s+$//'
 }