Port root before_v0.60/*.nu scripts (issue #221) (#837)

This PR is part of porting all old scripts #221 and ports all root
`before_v0.60/*.nu` scripts to `modules/*.nu`

before_v0.60/lint_directories.nu → modules/lint_directories.nu

@@ -3,14 +3,14 @@
 # - 1.0.1 is a valid directory name.
 # - yeah_whatever_linter is not a valid directory name.
 def ls-incorrect-dirs [] {
- ls | where type == 'Dir' and name != 'scripts'| match -v name '(\d+\.){2,}\d$'
+ ls | where type == dir and name != 'scripts' | find --invert --regex '(\d+\.){2,}\d$' --columns [name]
 }
 let incorrect_count = (ls-incorrect-dirs | length);
 if $incorrect_count > 0 {
-# echo `The following directories are named incorrectly: {{(char newline)}}`
- $"The following directories are named incorrectly: (char newline)"
- ls-incorrect-dirs
- exit 1
-} {
- exit 0
+  print $"The following directories are named incorrectly: (char newline)"
+  print (ls-incorrect-dirs)
+ exit 1
+
+} else {
+ exit 0
 }

before_v0.60/maintainer_time.nu → modules/maintainer_time.nu

@@ -12,9 +12,7 @@ let m_table = (
  ]
 )
 let now = (date now)
-$m_table | update time {
- each { |name|
- $now | date to-timezone ($name | get tz) | date format '%c'
- }
+$m_table | update time {|row|
+ $now | date to-timezone ($row | get tz) | format date '%c'
 }
 

before_v0.60/make_readme_table.nu → modules/make_readme_table.nu

@@ -17,14 +17,14 @@ let nu_table = ($nu_files |
  let cat = ($it.File | path dirname)
  if $cat == "" {
  "not assigned yet"
- } {
+ } else {
  $cat
  }
  } | where Category !~ ".git" | select Category File | sort-by Category)
 
 # Let's fix the file now
 let nu_table = ($nu_table | update File { |it|
- let file_path = ($it.File | into string | str find-replace '\\' '/')
+ let file_path = ($it.File | into string | str replace '\' '/' --all)
  let file_name = ($file_path | path basename)
  $"[($file_name)](char lparen)./($file_path)(char rparen)"
 })