Mitsuhiro Nakamura avatar Mitsuhiro Nakamura committed f785800

Fixed the coding style in ArgOpt.

Comments (0)

Files changed (1)

-(* Last modified: 2011-12-31 18:00:12. *)
+(* Last modified: 2011-12-31 18:41:21. *)
 
 open Ext
 
   begin
     let source' = match o with
                   | {source = `Default} -> `File
-                  | {source = source}   -> source
-    in o.source <- source';
+                  | {source = source}   -> source in
+    o.source <- source';
     let split_by' = match o with
                     | {source = `File;   split_by = `Default} -> `Line
                     | {source = `Quoted; split_by = `Default} -> `Word
-                    | {split_by = split_by} -> split_by
-    in o.split_by <- split_by';
+                    | {split_by = split_by} -> split_by in
+    o.split_by <- split_by';
     let limit' = match o with
                  | {limit = `Default} -> `All
-                 | {limit = limit}    -> limit
-    in o.limit <- limit'
+                 | {limit = limit}    -> limit in
+    o.limit <- limit'
   end
 
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.