3 files changed, 13 insertions, 14 deletions
diff --git a/fvwm/.fvwm/fvwmscript/.#FvwmScript-ACPIStatus b/fvwm/.fvwm/fvwmscript/.#FvwmScript-ACPIStatus
deleted file mode 120000
index f86cf16..0000000
--- a/fvwm/.fvwm/fvwmscript/.#FvwmScript-ACPIStatus
+++ /dev/null
@@ -1 +0,0 @@
-[email protected]:1720031871
-\ No newline at end of file
diff --git a/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus b/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus
index b6c6d75..a9daa8b 100644
--- a/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus
+++ b/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus
@@ -1,21 +1,21 @@
-WindowTitle {}
+WindowTitle {ACPIStatus}
 WindowSize  120 35
-Font "xft:Iosevka Comfy:size=12"
+Font "xft:Iosevka Comfy:size=14"
 
 Init
  Begin
-  Set $Date = (GetOutput {exec date "+%Y-%m-%d"} 1 -1)
+  Set $Battery = (GetOutput {exec acpi | sed -e 's/^.*, \([0-9]*\)%.*$/\1%/g'} 1 -1)
 
-  ChangeTitle 1 $Date
+  ChangeTitle 1 $Battery
 End
 
 PeriodicTasks
  Begin
-  If (RemainderOfDiv (GetTime) 15)==0 Then
+  If (RemainderOfDiv (GetTime) 60)==0 Then
   Begin
-   Set $Date = (GetOutput {exec date "+%Y-%m-%d"} 1 -1)
+   Set $Battery = (GetOutput {exec acpi | sed -e 's/^.*, \([0-9]*\)%.*$/\1%/g'} 1 -1)
 
-   ChangeTitle 1 $Date
+   ChangeTitle 1 $Battery
   End
 End
 
@@ -23,7 +23,7 @@ Widget 1
 Property
  Position 0 0
  Size 120 20
- Font "xft:Iosevka Comfy:size=12"
+ Font "xft:Iosevka Comfy:size=14"
  Type ItemDraw
  Flags NoReliefString
  Title {}
diff --git a/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime b/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime
index 1d316d9..340ea1f 100644
--- a/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime
+++ b/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime
@@ -1,6 +1,6 @@
 WindowTitle {DateTime}
-WindowSize  120 35
-Font "xft:Iosevka Comfy:size=12"
+WindowSize  120 65
+Font "xft:Iosevka Comfy:size=14"
 
 Init
  Begin
@@ -27,7 +27,7 @@ Widget 1
 Property
  Position 0 0
  Size 120 20
- Font "xft:Iosevka Comfy:size=12"
+ Font "xft:Iosevka Comfy:size=14"
  Type ItemDraw
  Flags NoReliefString
  Title {}
@@ -41,8 +41,8 @@ End
 Widget 2
 Property
  Position 0 20
- Size 120 15
- Font "xft:Iosevka Comfy:size=12"
+ Size 120 20
+ Font "xft:Iosevka Comfy:size=14"
  Type ItemDraw
  Flags NoReliefString
  Title {}