jr: fix the busted RTSH behavior

For some reason on Photon, when RTSH was being invoked, it was setting
the Mod3 bit? So XMonad thought I was pressing the hyper key, and thus
trying to type level5 shifted characters was causing intereference.

This is bizarre behavior, and seems to me to must have been caused by an
update to X11, though I'm not sure what that update would have done.

It appears as forcing it to use Mod4 solves the problem for now, though
I suspect this is meerly a band-aid and not an actual solution.

1 files changed, 7 insertions, 7 deletions

diff --git a/jr b/jr
index 4b9277a..2bbfc3d 100644
--- a/jr
+++ b/jr
@@ -29,13 +29,9 @@ xkb_symbols "josh-dvorak-intl" {
   };
   key <RWIN> {
     type[Group1]="ONE_LEVEL", symbols[Group1]=[ISO_Level3_Shift]
-    // symbols[Group1] = [Control_R, Control_R, Control_R, Control_R, Control_R, Control_R, Control_R, Control_R]
   };
   key <LCTL> {
-    symbols[Group1] = [Hyper_L, Hyper_L, Hyper_L, Hyper_L, Hyper_L, Hyper_L, Hyper_L, Hyper_L]
-  };
-  key <RTSH> {
-    symbols[Group1] = [ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift, ISO_Level5_Shift]
+    type[Group1] = "ONE_LEVEL", symbols[Group1] = [Hyper_L]
   };
   key <CAPS> {
     symbols[Group1] = [Escape, Escape, Home, Home, User, Pointer_EnableKeys, Delete, Delete]
@@ -63,9 +59,13 @@ xkb_symbols "josh-dvorak-intl" {
   modifier_map Mod5 {<RALT>};
 
   key <RTSH> {
-    symbols[Group1] = type[Group1]="ONE_LEVEL", symbols[Group1]=[ISO_Level5_Shift]
+    type[Group1]="ONE_LEVEL", symbols[Group1]=[ISO_Level5_Shift]
   };
-  modifier_map Lock {<RTSH> };
+  // I have no idea what's going on. Without this line, X11 appears to
+  // interpret right shift as if it was also a hyper key? This isn't right. I
+  // think this probably interprets it as a super key, but idk, it appears to
+  // solve some of this problem though this is a gross hack.
+  modifier_map Mod4 {<RTSH>};
 
   // Set Menu and PrintScreen to Hyper.
   key <MENU> {