Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Remove debug statements

  • Loading branch information...
commit 0d943024a5a09cb7e213fc39efeb133e7ef27dd7 1 parent 4f290be
Thomas Gazagnaire authored November 10, 2010

Showing 2 changed files with 3 additions and 5 deletions. Show diff stats Hide diff stats

  1. 2  cass_lexer.mll
  2. 6  css.ml
2  cass_lexer.mll
@@ -57,7 +57,7 @@ rule token = parse
57 57
                          STRING x }
58 58
 
59 59
 and dollar = parse
60  
-  | ([^ '$']* as str) '$' { update lexbuf; Printf.eprintf "[LEXER] %s\n" str; str }
  60
+  | ([^ '$']* as str) '$' { update lexbuf; str }
61 61
  
62 62
 and dquote = parse
63 63
   | ([^ '"']* as str) '"' { update lexbuf; str }
6  css.ml
@@ -77,14 +77,12 @@ open Css
77 77
 
78 78
 (* From http://www.webdesignerwall.com/tutorials/cross-browser-css-gradient/ *)
79 79
 let gradient ~(low : t) ~(high : t) : t =
80  
-  let r = <:css<
  80
+  <:css<
81 81
     background: $low$; /* for non-css3 browsers */
82 82
     filter: progid:DXImageTransform.Microsoft.gradient(startColorstr=$high$, endColorstr=$low$); /* for IE */
83 83
     background: -webkit-gradient(linear, left top, left bottom, from($high$), to($low$)); /* for webkit browsers */
84 84
     background: -moz-linear-gradient(top,  $high$,  $low$); /* for firefox 3.6+ */
85  
- >> in
86  
-                                                               
87  
-Printf.eprintf "[GRADIENT]: %s\n" (to_string r); r
  85
+ >>
88 86
 
89 87
 let rounded : t =
90 88
   <:css<

0 notes on commit 0d94302

Please sign in to comment.
Something went wrong with that request. Please try again.