Browse Source

Правильное разделение имени файла на авторов и заголовок

master
Maxim Likhachev 5 years ago
parent
commit
c0b2e4fc54
  1. 17
      press-n-post

17
press-n-post

@ -3,6 +3,7 @@
package require Tk package require Tk
package require Img package require Img
package require fileutil package require fileutil
package require textutil
package require platform package require platform
#---------------------------------------------------------------------- #----------------------------------------------------------------------
@ -160,7 +161,12 @@ namespace eval pdf {
# #
# Фамилия_1 И.О., Фамилия_2 И.О. - Название работы.pdf # Фамилия_1 И.О., Фамилия_2 И.О. - Название работы.pdf
# #
if {![regexp {(.*) - (.*)} $file_basename {} authors title]} { set authors_title [::textutil::splitx $file_basename " - "]
if {[llength $authors_title] >= 2} {
set authors [lindex $authors_title 0]
set title [join [lrange $authors_title 1 end] " - "]
} else {
set authors {} set authors {}
set title $file_basename set title $file_basename
} }
@ -326,12 +332,19 @@ namespace eval cover {
# Создание webp-вариантов изображений # Создание webp-вариантов изображений
proc make_webp {} { proc make_webp {} {
catch {exec cwebp "${::pdf::file_rootname}.jpg" -o "${::pdf::file_rootname}.webp" >/dev/null} catch {exec cwebp "${::pdf::file_rootname}.jpg" -o "${::pdf::file_rootname}.webp" >/dev/null}
if {[file exists ${::pdf::file_rootname}.th.jpg]} {
catch {exec cwebp "${::pdf::file_rootname}.th.jpg" -o "${::pdf::file_rootname}.th.webp" >/dev/null} catch {exec cwebp "${::pdf::file_rootname}.th.jpg" -o "${::pdf::file_rootname}.th.webp" >/dev/null}
} }
}
# Оптимизация изображений # Оптимизация изображений
proc optimize {} { proc optimize {} {
exec resmushit-cli --preserve-filename "${::pdf::file_rootname}.jpg" exec resmushit-cli --preserve-filename "${::pdf::file_rootname}.jpg" >/dev/null
if {[file exists ${::pdf::file_rootname}.th.jpg]} {
exec resmushit-cli --preserve-filename "${::pdf::file_rootname}.th.jpg"
}
} }
# TODO: Обрезка изображения # TODO: Обрезка изображения

Loading…
Cancel
Save