Window fix - Change all occurences of window -h to window -H

peace-and-protection · Aug 10, 2015 · c35b547 · c35b547
1 parent 4d6754c
commit c35b547
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 10 deletions.
diff --git a/script/dofirst.ini b/script/dofirst.ini
@@ -108,7 +108,7 @@ n4=
 n5=
 n6=alias -l _progress.1 {
 n7=close -@ @Progress
-n8=window -pfdohkaB +bLt @Progress $calc($window(-1).w - 330) $calc($window(-1).h - 160) 319 104
+n8=window -pfdoHkaB +bLt @Progress $calc($window(-1).w - 330) $calc($window(-1).h - 160) 319 104
 n9=drawrect -frn @Progress $rgb(face) 2 0 0 319 104
 n10=drawrect -rn @Progress $rgb(face) 7 0 60 319 44
 n11=drawtext -nr @Progress $rgb(text) "ms sans serif" 16 8 25 $1-

diff --git a/script/first.mrc b/script/first.mrc
@@ -149,7 +149,7 @@ _st.error Error during ' $+ %event $+ '
   ; Splash
   if ($readini(config\ $+ $hget(pnp,user) $+ \config.ini,n,cfg,hidesplash)) window -c @Startup
   elseif (!$window(@Startup)) {
-    window -pfarodhkBz +bdL @Startup $int($calc(($window(-1).w - 250) / 2)) $int($calc(($window(-1).h - 350) / 2)) 250 350
+    window -pfarodHkBz +bdL @Startup $int($calc(($window(-1).w - 250) / 2)) $int($calc(($window(-1).h - 350) / 2)) 250 350
     titlebar @Startup $findfile(script\,pp4title*.png,$r(1,$findfile(script\,pp4title*.png,0)))
     if ($exists($window(@Startup).title)) {
       drawpic -c @Startup 0 0 " $+ $window(@Startup).title $+ "
@@ -451,7 +451,7 @@ if ((%moved) && (!$hget(pnp.startup,firsttime))) _stecho Moved %moved scripts
 ; Check addons loaded; check 3.20 compat
 alias _ck.addon {
   ; First, list all non-PnP scripts
-  window -hnl @.allscript
+  window -Hnl @.allscript
   var %num = 1
   while ($script(%num)) {
     if (*#= P&P* -rs* !iswm $read($script(%num),tn,1)) aline @.allscript $script(%num)
@@ -577,7 +577,7 @@ alias _ck.order2 {
   var %top,%bad,%file
 
   ; Determine scripts to be reordered
-  window -hnls @.reload
+  window -Hnls @.reload
   var %num = $script(0)
   :loop1
   %top = $read($script(%num),tn,1)
@@ -643,7 +643,7 @@ _stecho Performing PnP startup... $chr(40) $+ profile - $hget(pnp,user) $+ $chr(
   .enable #pnpdde
   ; Only one copy should do this at a time
   if ($lof(script\temp\semaphor.) > 0) {
-    if ($window(@Startup)) window -h @Startup
+    if ($window(@Startup)) window -H @Startup
     ; Timestamp in semaphor too old? possible problem, auto disable DDE
     if ($read(script\temp\semaphor.,n,1) < $calc($ctime - 60)) {
 echo 4 -sti2 $iif($:*,$:*,***) Startup problems detected from earlier- Disabling DDE $chr(40) $+ may cause problems if you open multiple mIRCs $+ $chr(41)
@@ -935,7 +935,7 @@ alias _pnp.upgrade {
       filter -ffxc $_cfg(pw.ini) $_cfg(pw.ini) !all=*
 
       ; Changes to nsforce/csforce sections
-      window -hnl @.force
+      window -Hnl @.force
       if ($ini($_cfg(pw.ini),nsforce)) {
         loadbuf -tnsforce @.force $_cfg(pw.ini)
         var %ln = 1
@@ -965,7 +965,7 @@ alias _pnp.upgrade {
 
       ; Changes to xw section
       if ($ini($_cfg(pw.ini),xw)) {
-        window -hnl @.xw
+        window -Hnl @.xw
         loadbuf -txw @.xw $_cfg(pw.ini)
         if (($readini($_cfg(pw.ini),n,xw,nets) == $null) && ($line(@.xw,0))) {
           var %ln = 1,%xall,%zall,%xnets
@@ -1391,7 +1391,7 @@ alias _pnp.upgrade {
 
   if (%lastver < 4.22) {
     ; Fixes to nsforce/csforce sections
-    window -hnl @.force
+    window -Hnl @.force
     if ($ini($_cfg(pw.ini),nsforce)) {
       loadbuf -tnsforce @.force $_cfg(pw.ini)
       var %ln = 1

diff --git a/script/window.mrc b/script/window.mrc
@@ -391,15 +391,15 @@ alias -l _qflash {
 on *:KEYDOWN:@Progress:13,27:close -@ @Progress @.pbmp | _check.specwins
 alias _progress.1 {
   close -@ @Progress @.pbmp | _lock.tb
-  window -pfdohkaBz +bLt @Progress $calc($window(-1).w - 330) $calc($window(-1).h - 160) 319 104
+  window -pfdoHkaBz +bLt @Progress $calc($window(-1).w - 330) $calc($window(-1).h - 160) 319 104
   drawrect -frn @Progress $rgb(face) 2 0 0 319 104
   _gradient @Progress 9 69 300 25
   _bevel @Progress 7 67 304 29
   drawrect -rn @Progress $rgb(face) 7 0 60 319 44
   drawtext -nr @Progress $rgb(text) "ms sans serif" 16 8 25 $1-
   drawpic -nt @Progress $rgb(255,255,255) 247 1 195 65 64 64 script\icons.bmp
   drawdot @Progress
-  window -hpf @.pbmp 0 0 301 30
+  window -Hpf @.pbmp 0 0 301 30
   drawcopy @Progress 9 69 300 28 @.pbmp 0 0
 }
 alias _progress.2 {